Midpoint on a great circle

Time bar (total: 17.7s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze547.0ms (3.1%)

Memory
5.4MiB live, 742.2MiB allocated
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
9.4%9.4%90.4%0.2%0%0%0%9
9.4%9.4%90.4%0.2%0%0%0%10
10.9%10.9%88.9%0.2%0%0%0%11
10.9%10.9%88.9%0.2%0%0%0%12
Compiler

Compiled 22 to 16 computations (27.3% saved)

sample5.4s (30.3%)

Memory
-935.2MiB live, 5 986.4MiB allocated
Samples
4.2s4 328×1valid
682.0ms3 920×0valid
4.0ms2valid
Precisions
Click to see histograms. Total time spent on operations: 4.5s
ival-cos: 2.8s (62.3% of total)
ival-sin: 603.0ms (13.5% of total)
ival-atan2: 269.0ms (6% of total)
ival-mult: 256.0ms (5.7% of total)
adjust: 249.0ms (5.6% of total)
ival-add: 182.0ms (4.1% of total)
ival-sub: 109.0ms (2.4% of total)
ival-true: 8.0ms (0.2% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain468.0ms (2.6%)

Memory
-27.6MiB live, 714.8MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
81107(-1.4580406516989192e-254 1.864513271434333e+297 -7.633797497107933e-202 2.9318055567727854e+290)0-(sin.f64 (-.f64 lambda1 lambda2))
81107(-1.4580406516989192e-254 1.864513271434333e+297 -7.633797497107933e-202 2.9318055567727854e+290)0-(cos.f64 (-.f64 lambda1 lambda2))
70-2(1.4078989345120838e+124 8.576391809821561e-178 -6.362390331516339e+130 8.00016101594702e-61)(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
10-0-(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
00-0-lambda2
00-0-phi1
00-0-phi2
00-0-(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
00-0-(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
00-0-(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
00-0-(-.f64 lambda1 lambda2)
00-0-lambda1
00-0-(cos.f64 phi2)
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (-.f64 lambda1 lambda2))sensitivity1880
sin.f64(sin.f64 (-.f64 lambda1 lambda2))sensitivity1880
+.f64(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))cancellation24
+.f64(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))cancellation10
Confusion
Predicted +Predicted -
+90
-18067
Precision
0.047619047619047616
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+900
-180166
Precision?
0.04736842105263158
Recall?
1.0
Freqs
test
numberfreq
067
11
2186
32
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
290.0ms350×1valid
24.0ms160×0valid
2.0ms2valid
Compiler

Compiled 186 to 46 computations (75.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 281.0ms
ival-cos: 141.0ms (50.2% of total)
ival-atan2: 53.0ms (18.9% of total)
adjust: 31.0ms (11% of total)
ival-sin: 30.0ms (10.7% of total)
ival-mult: 12.0ms (4.3% of total)
ival-add: 8.0ms (2.8% of total)
ival-sub: 5.0ms (1.8% of total)
ival-true: 1.0ms (0.4% of total)
ival-assert: 0.0ms (0% of total)

preprocess133.0ms (0.8%)

Memory
-4.0MiB live, 85.2MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
092294
1168287
2260285
3480285
4784285
5994285
61259285
71523285
81851285
92185285
102611285
112780285
122875285
132915285
142939285
152943285
162943285
01420
02420
13020
23520
34120
45020
57420
611320
715220
822120
927420
1036220
1139720
1242620
1349020
1452920
1554820
1656820
1759020
1860620
1960920
060919
Stop Event
iter limit
saturated
iter limit
saturated
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
Symmetry

(abs phi2)

(abs phi1)

Compiler

Compiled 20 to 14 computations (30% saved)

eval0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated
Compiler

Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

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

Compiled 20 to 14 computations (30% saved)

simplify26.0ms (0.1%)

Memory
-24.6MiB live, 12.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01481
02481
13081
23581
34181
45081
57481
611381
715281
822181
927481
1036281
1139781
1242681
1349081
1452981
1554881
1656881
1759081
1860681
1960981
060978
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))

localize158.0ms (0.9%)

Memory
36.0MiB live, 256.6MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.20150375976844204
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy0.5727702657871764
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy16.641874261537904
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.811905017004417
(sin.f64 (-.f64 lambda1 lambda2))
Samples
127.0ms175×1valid
15.0ms80×0valid
3.0ms2valid
Compiler

Compiled 83 to 16 computations (80.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 124.0ms
ival-cos: 75.0ms (60.6% of total)
ival-sin: 14.0ms (11.3% of total)
adjust: 8.0ms (6.5% of total)
ival-atan2: 8.0ms (6.5% of total)
ival-sub: 7.0ms (5.7% of total)
ival-mult: 6.0ms (4.9% of total)
ival-add: 4.0ms (3.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series36.0ms (0.2%)

Memory
-15.5MiB live, 77.3MiB allocated
Counts
6 → 228
Calls
Call 1
Inputs
#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
Outputs
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.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 phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.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 phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.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 phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.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 (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
Calls

12 calls:

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

simplify155.0ms (0.9%)

Memory
15.9MiB live, 205.3MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02303176
16833129
218993074
337453074
084982880
Stop Event
iter limit
node limit
Counts
228 → 226
Calls
Call 1
Inputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos 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 phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
Outputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda2) #s(literal -1/6 binary64)) lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 (sin.f64 lambda2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 (sin.f64 lambda2) #s(literal 1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) #s(literal -1/6 binary64)) lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 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 phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(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 phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))))))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 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 phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(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))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(fma.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))

rewrite180.0ms (1%)

Memory
-1.1MiB live, 241.6MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01463
02463
18263
257463
3689963
0844260
Stop Event
iter limit
node limit
iter limit
Counts
6 → 231
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval118.0ms (0.7%)

Memory
1.5MiB live, 116.1MiB allocated
Compiler

Compiled 16 265 to 1 383 computations (91.5% saved)

prune181.0ms (1%)

Memory
-30.8MiB live, 183.2MiB allocated
Pruning

52 alts after pruning (52 fresh and 0 done)

PrunedKeptTotal
New40552457
Fresh000
Picked101
Done000
Total40652458
Accuracy
98.4%
Counts
458 → 52
Alt Table
Click to see full alt table
StatusAccuracyProgram
94.2%
(fma.f64 lambda1 (/.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
75.0%
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
61.6%
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (*.f64 lambda1 lambda1)))
97.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
90.1%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
73.5%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
73.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
32.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
90.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
87.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))))
90.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
91.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
91.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))))))
90.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
91.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.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 lambda1) (cos.f64 lambda2)))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.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)))))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))))))
97.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
91.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal -1 binary64))))))
91.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
79.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
97.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
79.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
76.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
97.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 (sin.f64 lambda2) #s(literal 1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
96.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
60.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
87.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
96.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
76.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.8%
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
97.7%
(*.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))
Compiler

Compiled 3 956 to 2 120 computations (46.4% saved)

simplify170.0ms (1%)

Memory
22.0MiB live, 97.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff256
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff14528
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
cost-diff0
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
cost-diff0
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
056754
0101742
1171724
2400694
31027694
42457694
54676694
66396694
08767679
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda2
phi2
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
#s(literal 1/2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))))
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))
#s(literal 1 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))))
(cos.f64 phi2)
phi2
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
#s(literal 2 binary64)
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda2
phi2
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
#s(literal 1/2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))
#s(literal 1 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(cos.f64 phi2)
phi2
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))
(-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
#s(literal 2 binary64)
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)

localize778.0ms (4.4%)

Memory
1.0MiB live, 897.3MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.5727702657871764
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy3.2589415961908323
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
accuracy16.641874261537904
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.722059805090215
(sin.f64 (+.f64 lambda2 lambda1))
accuracy3.229976605959274
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
accuracy16.641874261537904
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.722059805090215
(sin.f64 (+.f64 lambda2 lambda1))
accuracy16.811905017004417
(sin.f64 (-.f64 lambda1 lambda2))
accuracy10.290607055511193
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
accuracy16.641874261537904
(cos.f64 (-.f64 lambda1 lambda2))
accuracy30.00859480112815
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
accuracy30.263158409155615
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
accuracy0.5727702657871764
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy16.641874261537904
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.811905017004417
(sin.f64 (-.f64 lambda1 lambda2))
accuracy29.917764843575746
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.16796875
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
accuracy0.20150375976844204
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy0.5727702657871764
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy16.641874261537904
(cos.f64 (-.f64 lambda1 lambda2))
Samples
689.0ms231×1valid
10.0ms24×0valid
9.0ms2valid
Compiler

Compiled 745 to 55 computations (92.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 591.0ms
ival-sin: 195.0ms (33% of total)
ival-cos: 154.0ms (26.1% of total)
ival-sub: 64.0ms (10.8% of total)
ival-mult: 54.0ms (9.1% of total)
ival-atan2: 47.0ms (8% of total)
adjust: 37.0ms (6.3% of total)
ival-add: 25.0ms (4.2% of total)
ival-pow2: 5.0ms (0.8% of total)
ival-div: 5.0ms (0.8% of total)
ival-neg: 4.0ms (0.7% of total)
exact: 1.0ms (0.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series117.0ms (0.7%)

Memory
7.4MiB live, 226.7MiB allocated
Counts
24 → 912
Calls
Call 1
Inputs
#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())
#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())
#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())
#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())
Outputs
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (pow (sin lambda2) 2) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow lambda1 2) (pow (sin lambda2) 2))) (pow (sin lambda2) 2)) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda1 2) (+ (* -1 (pow (sin lambda2) 2)) (* 1/3 (* (pow lambda1 2) (pow (sin lambda2) 2))))) (pow (sin lambda2) 2)) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda1 2) (+ (* -1 (pow (sin lambda2) 2)) (* (pow lambda1 2) (+ (* -2/45 (* (pow lambda1 2) (pow (sin lambda2) 2))) (* 1/3 (pow (sin lambda2) 2)))))) (pow (sin lambda2) 2)) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<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 (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 phi2))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2)))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (+ (* -1/2 (sin (- phi2 lambda2))) (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2))))))))))))) (taylor 0 lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* 1/2 (sin lambda2))))) (* -1 (cos lambda2))))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos lambda2) (+ (* -1 (sin lambda2)) (* 1/2 (sin lambda2)))) (sin lambda2))) (+ (* -1/2 (cos lambda2)) (* 1/6 (cos lambda2)))))) (+ (* -1 (sin lambda2)) (* 1/2 (sin lambda2))))) (* -1 (cos lambda2))))) (taylor 0 lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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 lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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 lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (pow (cos lambda1) 2)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ (* -1/3 (* (pow lambda2 2) (pow (cos lambda1) 2))) (pow (cos lambda1) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (cos lambda1) 2)) (* 2/45 (* (pow lambda2 2) (pow (cos lambda1) 2))))) (pow (cos lambda1) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (cos lambda1) 2)) (* (pow lambda2 2) (+ (* -1/315 (* (pow lambda2 2) (pow (cos lambda1) 2))) (* 2/45 (pow (cos lambda1) 2)))))) (pow (cos lambda1) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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 (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 phi2)) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 phi2)) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2))))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))))))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (+ (* -1/2 (sin (- lambda1 phi2))) (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2))))))))))))) (taylor 0 lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* lambda2 (- (* -1 (sin lambda1)) (+ (* -1 (/ (pow (cos lambda1) 2) (sin lambda1))) (+ (* -1/2 (sin lambda1)) (/ (pow (cos lambda1) 2) (sin lambda1)))))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1 (sin lambda1)) (* -1 (* lambda2 (+ (* -1/6 (cos lambda1)) (+ (* 1/2 (cos lambda1)) (/ (* (cos lambda1) (- (* -1 (sin lambda1)) (+ (* -1 (/ (pow (cos lambda1) 2) (sin lambda1))) (+ (* -1/2 (sin lambda1)) (/ (pow (cos lambda1) 2) (sin lambda1)))))) (sin lambda1))))))) (+ (* -1 (/ (pow (cos lambda1) 2) (sin lambda1))) (+ (* -1/2 (sin lambda1)) (/ (pow (cos lambda1) 2) (sin lambda1)))))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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 lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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 (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 lambda2)) phi2)) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2))))))))))) (taylor 0 phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (* 2 (sin (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* -1 (* phi2 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1 (sin (- lambda1 lambda2))) (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2))))))))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 phi2))) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 phi2) lambda2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (patch (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- (+ lambda1 (* -1 phi2)) lambda2)) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (patch (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (patch (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
16.0ms
phi2
@-inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (sin (- (- lambda1 lambda2) phi2)) (sin (+ (- lambda1 lambda2) phi2)) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (sin (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))))
11.0ms
lambda2
@-inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (sin (- (- lambda1 lambda2) phi2)) (sin (+ (- lambda1 lambda2) phi2)) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (sin (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))))
8.0ms
lambda1
@inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (sin (- (- lambda1 lambda2) phi2)) (sin (+ (- lambda1 lambda2) phi2)) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (sin (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))))
7.0ms
lambda1
@-inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (sin (- (- lambda1 lambda2) phi2)) (sin (+ (- lambda1 lambda2) phi2)) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (sin (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))))
6.0ms
lambda2
@inf
((+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1))) (+ lambda1 (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (cos (- lambda1 lambda2)) (* (cos lambda2) (sin lambda1)) (sin (- lambda1 lambda2)) (sin (- (- lambda1 lambda2) phi2)) (sin (+ (- lambda1 lambda2) phi2)) (+ (sin (+ (- lambda1 lambda2) phi2)) (sin (- (- lambda1 lambda2) phi2))) (sin (+ lambda2 lambda1)) (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))))

simplify228.0ms (1.3%)

Memory
5.8MiB live, 358.5MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
071617999
1236417587
2735317568
0807516868
Stop Event
iter limit
node limit
Counts
912 → 902
Calls
Call 1
Inputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))
(+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(pow (sin lambda2) 2)
(+ (* -1 (* (pow lambda1 2) (pow (sin lambda2) 2))) (pow (sin lambda2) 2))
(+ (* (pow lambda1 2) (+ (* -1 (pow (sin lambda2) 2)) (* 1/3 (* (pow lambda1 2) (pow (sin lambda2) 2))))) (pow (sin lambda2) 2))
(+ (* (pow lambda1 2) (+ (* -1 (pow (sin lambda2) 2)) (* (pow lambda1 2) (+ (* -2/45 (* (pow lambda1 2) (pow (sin lambda2) 2))) (* 1/3 (pow (sin lambda2) 2)))))) (pow (sin lambda2) 2))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* lambda1 (cos lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(sin (neg (+ lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2)))))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2))))))))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2))))))))))
(sin (- phi2 lambda2))
(+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2))))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2)))))))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2)))))))))
(+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (+ (* -1/2 (sin (- phi2 lambda2))) (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))))))))))
(sin lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(* -1 (sin lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* 1/2 (sin lambda2))))) (* -1 (cos lambda2)))))
(+ (* -1 (sin lambda2)) (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos lambda2) (+ (* -1 (sin lambda2)) (* 1/2 (sin lambda2)))) (sin lambda2))) (+ (* -1/2 (cos lambda2)) (* 1/6 (cos lambda2)))))) (+ (* -1 (sin lambda2)) (* 1/2 (sin lambda2))))) (* -1 (cos lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1))))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1))))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1))))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))
(+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (pow lambda2 2) (pow (cos lambda1) 2))
(* (pow lambda2 2) (+ (* -1/3 (* (pow lambda2 2) (pow (cos lambda1) 2))) (pow (cos lambda1) 2)))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (cos lambda1) 2)) (* 2/45 (* (pow lambda2 2) (pow (cos lambda1) 2))))) (pow (cos lambda1) 2)))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (cos lambda1) 2)) (* (pow lambda2 2) (+ (* -1/315 (* (pow lambda2 2) (pow (cos lambda1) 2))) (* 2/45 (pow (cos lambda1) 2)))))) (pow (cos lambda1) 2)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(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)))))
(sin lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(sin (- lambda1 phi2))
(+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2)))))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2)))))))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2)))))))))
(sin (+ lambda1 phi2))
(+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2)))))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2)))))))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2)))))))))
(+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (+ (* -1/2 (sin (- lambda1 phi2))) (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))))))))))
(sin lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (- (* lambda2 (- (* -1 (sin lambda1)) (+ (* -1 (/ (pow (cos lambda1) 2) (sin lambda1))) (+ (* -1/2 (sin lambda1)) (/ (pow (cos lambda1) 2) (sin lambda1)))))) (cos lambda1))))
(+ (sin lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1 (sin lambda1)) (* -1 (* lambda2 (+ (* -1/6 (cos lambda1)) (+ (* 1/2 (cos lambda1)) (/ (* (cos lambda1) (- (* -1 (sin lambda1)) (+ (* -1 (/ (pow (cos lambda1) 2) (sin lambda1))) (+ (* -1/2 (sin lambda1)) (/ (pow (cos lambda1) 2) (sin lambda1)))))) (sin lambda1))))))) (+ (* -1 (/ (pow (cos lambda1) 2) (sin lambda1))) (+ (* -1/2 (sin lambda1)) (/ (pow (cos lambda1) 2) (sin lambda1)))))) (cos lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2))))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2))))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2))))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(* 2 (sin (- lambda1 lambda2)))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* -1 (* phi2 (sin (- lambda1 lambda2))))))))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1 (sin (- lambda1 lambda2))) (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
Outputs
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda2) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1)) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))) (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2))))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2)))))) (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))))))
(fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (+.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) (cos.f64 (-.f64 lambda2 phi2))) (cos.f64 (+.f64 lambda2 phi2))) (*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2)))) (* lambda1 (+ (* 1/2 (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))) (* 1/2 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))))) (*.f64 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64))) lambda1 (*.f64 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) #s(literal 1/2 binary64)))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(pow (sin lambda2) 2)
(pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))
(+ (* -1 (* (pow lambda1 2) (pow (sin lambda2) 2))) (pow (sin lambda2) 2))
(*.f64 (fma.f64 (neg.f64 lambda1) lambda1 #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(+ (* (pow lambda1 2) (+ (* -1 (pow (sin lambda2) 2)) (* 1/3 (* (pow lambda1 2) (pow (sin lambda2) 2))))) (pow (sin lambda2) 2))
(fma.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (*.f64 lambda1 lambda1) #s(literal -1 binary64))) (*.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(+ (* (pow lambda1 2) (+ (* -1 (pow (sin lambda2) 2)) (* (pow lambda1 2) (+ (* -2/45 (* (pow lambda1 2) (pow (sin lambda2) 2))) (* 1/3 (pow (sin lambda2) 2)))))) (pow (sin lambda2) 2))
(fma.f64 (fma.f64 (*.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 lambda1 lambda1) #s(literal 1/3 binary64))) (*.f64 lambda1 lambda1) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))) (*.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* lambda1 (cos lambda2))
(*.f64 (cos.f64 lambda2) lambda1)
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 (cos.f64 lambda2) lambda1))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(sin (neg (+ lambda2 phi2)))
(sin.f64 (-.f64 (neg.f64 lambda2) phi2))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (cos (neg (+ lambda2 phi2)))))
(fma.f64 (cos.f64 (+.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* -1/2 (* lambda1 (sin (neg (+ lambda2 phi2))))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (sin.f64 (-.f64 (neg.f64 lambda2) phi2)) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(+ (sin (neg (+ lambda2 phi2))) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/6 (* lambda1 (cos (neg (+ lambda2 phi2))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (cos.f64 (+.f64 lambda2 phi2)) (*.f64 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 (neg.f64 lambda2) phi2)))
(sin (- phi2 lambda2))
(sin.f64 (-.f64 phi2 lambda2))
(+ (sin (- phi2 lambda2)) (* lambda1 (cos (- phi2 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 phi2)) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* -1/2 (* lambda1 (sin (- phi2 lambda2)))))))
(fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (sin.f64 (-.f64 phi2 lambda2)) (cos.f64 (-.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (- phi2 lambda2))) (* -1/6 (* lambda1 (cos (- phi2 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (cos.f64 (-.f64 lambda2 phi2)) (*.f64 (sin.f64 (-.f64 phi2 lambda2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 (-.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2)))
(+ (sin (neg (+ lambda2 phi2))) (sin (- phi2 lambda2)))
(-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (cos (- phi2 lambda2))))))
(-.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (* -1/2 (sin (- phi2 lambda2))))))))))
(-.f64 (fma.f64 (+.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))) (cos.f64 (-.f64 lambda2 phi2))) (cos.f64 (+.f64 lambda2 phi2))) lambda1 (sin.f64 (-.f64 phi2 lambda2))) (sin.f64 (+.f64 lambda2 phi2)))
(+ (sin (neg (+ lambda2 phi2))) (+ (sin (- phi2 lambda2)) (* lambda1 (+ (cos (neg (+ lambda2 phi2))) (+ (cos (- phi2 lambda2)) (* lambda1 (+ (* -1/2 (sin (neg (+ lambda2 phi2)))) (+ (* -1/2 (sin (- phi2 lambda2))) (* lambda1 (+ (* -1/6 (cos (neg (+ lambda2 phi2)))) (* -1/6 (cos (- phi2 lambda2)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))))) lambda1 (+.f64 (cos.f64 (-.f64 lambda2 phi2)) (cos.f64 (+.f64 lambda2 phi2)))) lambda1 (-.f64 (sin.f64 (-.f64 phi2 lambda2)) (sin.f64 (+.f64 lambda2 phi2))))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(fma.f64 (fma.f64 (fma.f64 (sin.f64 lambda2) #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1)) lambda1 (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* 1/2 (sin lambda2))))) (* -1 (cos lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -1 (/ (* (cos lambda2) (+ (* -1 (sin lambda2)) (* 1/2 (sin lambda2)))) (sin lambda2))) (+ (* -1/2 (cos lambda2)) (* 1/6 (cos lambda2)))))) (+ (* -1 (sin lambda2)) (* 1/2 (sin lambda2))))) (* -1 (cos lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (neg.f64 lambda1) (fma.f64 (/.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda2)) (sin.f64 lambda2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) #s(literal -1/3 binary64))) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1))))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (neg.f64 lambda1)) (neg.f64 lambda1) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda2 (* -1 lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (neg (+ lambda2 (+ phi2 (* -1 lambda1)))))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- phi2 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (neg (+ lambda2 (+ phi2 (* -1 lambda1))))) (sin (- phi2 (+ lambda2 (* -1 lambda1)))))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda2 (* -1 lambda1))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2))))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64))
(+ (* 1/2 (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))) (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (fma.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))) lambda2 (sin.f64 (-.f64 lambda1 phi2))) (sin.f64 (+.f64 lambda1 phi2))))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2)))))) (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))) lambda2 (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2))))) lambda2 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))) (* lambda2 (+ (* 1/2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2))))) (* lambda2 (+ (* 1/2 (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))) (* 1/2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (fma.f64 (*.f64 lambda2 #s(literal 1/6 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2))) (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))))) (*.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2))))) lambda2 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (pow lambda2 2) (pow (cos lambda1) 2))
(*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) lambda2) lambda2)
(* (pow lambda2 2) (+ (* -1/3 (* (pow lambda2 2) (pow (cos lambda1) 2))) (pow (cos lambda1) 2)))
(*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (cos lambda1) 2)) (* 2/45 (* (pow lambda2 2) (pow (cos lambda1) 2))))) (pow (cos lambda1) 2)))
(*.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (fma.f64 #s(literal 2/45 binary64) (*.f64 lambda2 lambda2) #s(literal -1/3 binary64))) (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* (pow lambda2 2) (+ (* -1/3 (pow (cos lambda1) 2)) (* (pow lambda2 2) (+ (* -1/315 (* (pow lambda2 2) (pow (cos lambda1) 2))) (* 2/45 (pow (cos lambda1) 2)))))) (pow (cos lambda1) 2)))
(*.f64 (fma.f64 (fma.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (fma.f64 #s(literal -1/315 binary64) (*.f64 lambda2 lambda2) #s(literal 2/45 binary64))) (*.f64 lambda2 lambda2) (*.f64 #s(literal -1/3 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (*.f64 lambda2 lambda2))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(sin (- lambda1 phi2))
(sin.f64 (-.f64 lambda1 phi2))
(+ (sin (- lambda1 phi2)) (* -1 (* lambda2 (cos (- lambda1 phi2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 phi2)) (neg.f64 lambda2) (sin.f64 (-.f64 lambda1 phi2)))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* -1/2 (* lambda2 (sin (- lambda1 phi2)))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 phi2)))) lambda2 (sin.f64 (-.f64 lambda1 phi2)))
(+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (- lambda1 phi2))) (* 1/6 (* lambda2 (cos (- lambda1 phi2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal 1/6 binary64)) (cos.f64 (-.f64 lambda1 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 phi2)) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 (-.f64 lambda1 phi2)))) lambda2 (sin.f64 (-.f64 lambda1 phi2)))
(sin (+ lambda1 phi2))
(sin.f64 (+.f64 lambda1 phi2))
(+ (sin (+ lambda1 phi2)) (* -1 (* lambda2 (cos (+ lambda1 phi2)))))
(fma.f64 (cos.f64 (+.f64 lambda1 phi2)) (neg.f64 lambda2) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1/2 (* lambda2 (sin (+ lambda1 phi2)))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 (+.f64 lambda1 phi2)) (neg.f64 (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* 1/6 (* lambda2 (cos (+ lambda1 phi2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal 1/6 binary64)) (cos.f64 (+.f64 lambda1 phi2)) (*.f64 (sin.f64 (+.f64 lambda1 phi2)) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (sin (- lambda1 phi2)))
(+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (* -1 (cos (- lambda1 phi2)))))))
(+.f64 (fma.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2))) lambda2 (sin.f64 (-.f64 lambda1 phi2))) (sin.f64 (+.f64 lambda1 phi2)))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (* -1/2 (sin (- lambda1 phi2))))))))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))) (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))))
(+ (sin (+ lambda1 phi2)) (+ (sin (- lambda1 phi2)) (* lambda2 (+ (* -1 (cos (+ lambda1 phi2))) (+ (* -1 (cos (- lambda1 phi2))) (* lambda2 (+ (* -1/2 (sin (+ lambda1 phi2))) (+ (* -1/2 (sin (- lambda1 phi2))) (* lambda2 (+ (* 1/6 (cos (+ lambda1 phi2))) (* 1/6 (cos (- lambda1 phi2)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal 1/6 binary64)) (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2))) (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))))) lambda2 (-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 phi2))) (cos.f64 (+.f64 lambda1 phi2)))) lambda2 (+.f64 (sin.f64 (-.f64 lambda1 phi2)) (sin.f64 (+.f64 lambda1 phi2))))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(fma.f64 (cos.f64 lambda1) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) lambda2 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (- (* lambda2 (- (* -1 (sin lambda1)) (+ (* -1 (/ (pow (cos lambda1) 2) (sin lambda1))) (+ (* -1/2 (sin lambda1)) (/ (pow (cos lambda1) 2) (sin lambda1)))))) (cos lambda1))))
(fma.f64 (fma.f64 (-.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (- (* lambda2 (- (+ (* -1 (sin lambda1)) (* -1 (* lambda2 (+ (* -1/6 (cos lambda1)) (+ (* 1/2 (cos lambda1)) (/ (* (cos lambda1) (- (* -1 (sin lambda1)) (+ (* -1 (/ (pow (cos lambda1) 2) (sin lambda1))) (+ (* -1/2 (sin lambda1)) (/ (pow (cos lambda1) 2) (sin lambda1)))))) (sin lambda1))))))) (+ (* -1 (/ (pow (cos lambda1) 2) (sin lambda1))) (+ (* -1/2 (sin lambda1)) (/ (pow (cos lambda1) 2) (sin lambda1)))))) (cos lambda1))))
(fma.f64 (fma.f64 (-.f64 (neg.f64 (-.f64 (fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (fma.f64 (fma.f64 (-.f64 (neg.f64 (sin.f64 lambda1)) (-.f64 (fma.f64 (sin.f64 lambda1) #s(literal -1/2 binary64) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1))) (/.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (sin.f64 lambda1)))) (/.f64 (cos.f64 lambda1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) #s(literal 1/3 binary64))) lambda2 (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (+ lambda1 lambda2)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (sin lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (- lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(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))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 lambda2)) phi2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (+ lambda1 (+ phi2 (* -1 lambda2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (+ lambda1 (+ phi2 (* -1 lambda2)))) (sin (- (+ lambda1 (* -1 lambda2)) phi2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(/ (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2))) (sin (- lambda1 (* -1 lambda2))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (sin.f64 (+.f64 lambda1 lambda2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* 1/2 (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2)))))))
(fma.f64 #s(literal 0 binary64) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (* phi2 (sin (- lambda1 lambda2)))) (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) phi2))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/2 (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(fma.f64 (fma.f64 (fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64) (*.f64 #s(literal 0 binary64) phi2)) phi2 #s(literal 0 binary64)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1 (* phi2 (cos (- lambda1 lambda2)))))
(fma.f64 (neg.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(fma.f64 (neg.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi2 #s(literal 1/6 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) phi2 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1)))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* phi2 (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1/2 (* phi2 (sin (- lambda1 lambda2)))))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) phi2 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (sin (- lambda1 lambda2)) (* phi2 (+ (cos (- lambda1 lambda2)) (* phi2 (+ (* -1/2 (sin (- lambda1 lambda2))) (* -1/6 (* phi2 (cos (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi2 #s(literal -1/6 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1/2 binary64))) phi2 (cos.f64 (-.f64 lambda2 lambda1))) phi2 (sin.f64 (-.f64 lambda1 lambda2)))
(* 2 (sin (- lambda1 lambda2)))
(*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (* -1 (cos (- lambda1 lambda2))))))
(fma.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) phi2))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* -1 (* phi2 (sin (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (* 2 (sin (- lambda1 lambda2))) (* phi2 (+ (cos (- lambda1 lambda2)) (+ (* -1 (cos (- lambda1 lambda2))) (* phi2 (+ (* -1 (sin (- lambda1 lambda2))) (* phi2 (+ (* -1/6 (cos (- lambda1 lambda2))) (* 1/6 (cos (- lambda1 lambda2)))))))))))
(fma.f64 (*.f64 (-.f64 (*.f64 #s(literal 0 binary64) phi2) (sin.f64 (-.f64 lambda1 lambda2))) phi2) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 phi2)))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- (+ lambda1 phi2) lambda2))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(* 1/2 (+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2))))
(*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- (+ lambda1 (* -1 phi2)) lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(sin (- lambda1 (+ lambda2 (* -1 phi2))))
(sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ (sin (- lambda1 (+ lambda2 (* -1 phi2)))) (sin (- (+ lambda1 (* -1 phi2)) lambda2)))
(-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* 1/2 (+ (sin (- lambda1 (+ lambda2 phi2))) (sin (- (+ lambda1 phi2) lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (sin.f64 (-.f64 (+.f64 lambda1 phi2) lambda2)) (sin.f64 (-.f64 (+.f64 lambda2 phi2) lambda1))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (/ (* (cos phi2) (- (* (pow (cos lambda2) 2) (pow (sin lambda1) 2)) (* (pow (cos lambda1) 2) (pow (sin lambda2) 2)))) (sin (+ lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (neg.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))

rewrite217.0ms (1.2%)

Memory
-23.9MiB live, 339.8MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
056446
0101397
1365348
22810317
010049306
Stop Event
iter limit
node limit
iter limit
Counts
24 → 675
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(sin.f64 (-.f64 lambda1 lambda2))
(sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))
(sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))
(sin.f64 (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval504.0ms (2.8%)

Memory
18.4MiB live, 801.4MiB allocated
Compiler

Compiled 84 091 to 5 083 computations (94% saved)

prune279.0ms (1.6%)

Memory
21.6MiB live, 299.1MiB allocated
Pruning

65 alts after pruning (65 fresh and 0 done)

PrunedKeptTotal
New2 228412 269
Fresh232447
Picked505
Done000
Total2 256652 321
Accuracy
99.9%
Counts
2 321 → 65
Alt Table
Click to see full alt table
StatusAccuracyProgram
61.6%
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (*.f64 lambda1 lambda1)))
52.6%
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))))
97.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
94.4%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.3%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
70.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
70.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
51.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
98.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
98.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
75.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
97.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
96.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (cos.f64 lambda2) lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
82.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (pow.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
93.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
73.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
90.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
91.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.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 lambda1) (cos.f64 lambda2)))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
79.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
79.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
76.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
64.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
64.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal -1 binary64)) (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)))) #s(literal 2 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
76.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
68.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
68.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
74.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
73.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
61.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
74.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
62.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
63.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
74.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
62.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
75.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
52.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
71.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.7%
(*.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))
97.8%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
Compiler

Compiled 4 302 to 2 580 computations (40% saved)

simplify194.0ms (1.1%)

Memory
-16.6MiB live, 114.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff7104
(pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
cost-diff256
(-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)
cost-diff256
(-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
cost-diff0
(sin.f64 (-.f64 lambda1 lambda2))
cost-diff0
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
cost-diff128
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066774
0122765
1192759
2312731
3522703
41072703
52953703
64722703
75807703
86630703
97366703
107592703
117608703
08103687
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 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 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda2)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)))
(cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))
(-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))
(+.f64 lambda2 lambda1)
lambda2
(-.f64 lambda1 lambda2)
(cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))
(-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)
(+.f64 (+.f64 lambda2 lambda1) lambda1)
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))
(sin.f64 (+.f64 lambda2 lambda1))
#s(literal 2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))
(sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin.f64 lambda1)
(cos.f64 lambda2)
#s(literal 2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 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 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 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)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 lambda2)
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (-.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (-.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (-.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda1)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda2))) (/.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)))
(-.f64 (cos.f64 (*.f64 #s(literal -2 binary64) lambda2)) (cos.f64 (*.f64 #s(literal -2 binary64) lambda1)))
(cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))
(cos.f64 (*.f64 #s(literal -2 binary64) lambda2))
(-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) lambda2)
(+.f64 lambda2 lambda1)
lambda2
(-.f64 lambda1 lambda2)
(cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))
(cos.f64 (*.f64 #s(literal -2 binary64) lambda1))
(-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)
(*.f64 #s(literal 2 binary64) lambda1)
(+.f64 (+.f64 lambda2 lambda1) lambda1)
(fma.f64 #s(literal 2 binary64) lambda1 lambda2)
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda2 lambda1)))
(sin.f64 (+.f64 lambda2 lambda1))
#s(literal 2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin.f64 lambda1)
(cos.f64 lambda2)
#s(literal 2 binary64)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)

localize410.0ms (2.3%)

Memory
17.3MiB live, 532.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.11947250976844201
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
accuracy0.26791000976844204
(pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))
accuracy0.34781355817726284
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
accuracy8.570986930167445
(cos.f64 (-.f64 lambda1 lambda2))
accuracy8.7307653300754
(sin.f64 (+.f64 lambda2 lambda1))
accuracy13.066305340320422
(-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))
accuracy15.016315864937239
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
accuracy17.786957826733325
(-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)
accuracy0.11947250976844201
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
accuracy0.24797015732520644
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
accuracy8.796728344134795
(sin.f64 (-.f64 lambda1 lambda2))
accuracy13.653825301701088
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
accuracy8.570986930167445
(cos.f64 (-.f64 lambda2 lambda1))
accuracy8.796728344134795
(sin.f64 (-.f64 lambda1 lambda2))
accuracy14.048779106482293
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
accuracy15.016315864937239
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.08203125
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
accuracy0.0859375
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
accuracy0.11947250976844201
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
accuracy0.34781355817726284
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
Samples
238.0ms113×1valid
63.0ms122×0invalid
38.0ms16×2valid
3.0ms0valid
2.0ms3valid
Compiler

Compiled 652 to 55 computations (91.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 273.0ms
ival-cos: 106.0ms (38.8% of total)
ival-mult: 47.0ms (17.2% of total)
ival-sin: 31.0ms (11.4% of total)
adjust: 23.0ms (8.4% of total)
ival-sub: 21.0ms (7.7% of total)
ival-add: 21.0ms (7.7% of total)
ival-atan2: 14.0ms (5.1% of total)
ival-pow2: 4.0ms (1.5% of total)
ival-sqrt: 3.0ms (1.1% of total)
ival-div: 2.0ms (0.7% of total)
ival-neg: 2.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series98.0ms (0.6%)

Memory
-14.1MiB live, 154.6MiB allocated
Counts
27 → 1 008
Calls
Call 1
Inputs
#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())
#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())
#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
Outputs
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* 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 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<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 phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos phi2)) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda2) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (patch (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) (patch (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (patch (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<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 (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow phi2 2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.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)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (cos phi1)) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos lambda2) (cos phi2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda2) (cos phi2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
14.0ms
lambda1
@0
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (- (+ lambda2 lambda1) (- lambda1 lambda2)) (- (+ (+ lambda2 lambda1) lambda1) lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda2 lambda1)) (cos (- lambda1 lambda2)))
5.0ms
phi2
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (- (+ lambda2 lambda1) (- lambda1 lambda2)) (- (+ (+ lambda2 lambda1) lambda1) lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda2 lambda1)) (cos (- lambda1 lambda2)))
4.0ms
lambda1
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (- (+ lambda2 lambda1) (- lambda1 lambda2)) (- (+ (+ lambda2 lambda1) lambda1) lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda2 lambda1)) (cos (- lambda1 lambda2)))
4.0ms
lambda2
@inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (- (+ lambda2 lambda1) (- lambda1 lambda2)) (- (+ (+ lambda2 lambda1) lambda1) lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda2 lambda1)) (cos (- lambda1 lambda2)))
4.0ms
lambda2
@-inf
((+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (- (+ lambda2 lambda1) (- lambda1 lambda2)) (- (+ (+ lambda2 lambda1) lambda1) lambda2) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (pow (sqrt (* (sin lambda1) (cos lambda2))) 2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (+ lambda2 lambda1)) (cos (- lambda1 lambda2)))

simplify216.0ms (1.2%)

Memory
-5.4MiB live, 303.8MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
050316852
1161116377
2476816177
0888915157
Stop Event
iter limit
node limit
Counts
1 008 → 998
Calls
Call 1
Inputs
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* lambda1 (cos lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* lambda1 (cos lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg 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 phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(sin lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (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 phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (cos phi2))
(+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos 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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda2)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(* 2 lambda1)
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
1
(+ 1 (* -1/2 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ (cos lambda2) (cos phi1))
(+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda2)))))
(+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))
(+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos lambda2) (cos phi2)))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda2) (cos phi2))))
(+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
Outputs
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+.f64 (fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))) (cos.f64 phi1))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(* lambda1 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (*.f64 lambda1 (cos.f64 lambda2)))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 (cos.f64 lambda2)))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(*.f64 (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/6 binary64) lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* lambda1 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (*.f64 lambda1 (cos.f64 lambda2)))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 (cos.f64 lambda2)))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(*.f64 (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/6 binary64) lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))))) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2)))) (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(fma.f64 lambda1 (cos.f64 lambda2) (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+.f64 (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))))))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))))))
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+.f64 (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(fma.f64 (fma.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(fma.f64 (fma.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64)))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+.f64 (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))) (cos.f64 phi1))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+.f64 (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))) (cos.f64 phi1))
(+ (cos phi1) (cos phi2))
(+.f64 (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64)))))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))))))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* lambda2 (cos lambda1)))
(fma.f64 (cos.f64 lambda1) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) lambda2 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda2)
(*.f64 #s(literal 2 binary64) lambda2)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (+.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64)))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi2 2)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ (cos lambda2) (cos phi1))
(+.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow phi2 2) (cos lambda2)))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2)))))))
(fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (cos lambda2) (+ (cos phi1) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 lambda2) (fma.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))

rewrite197.0ms (1.1%)

Memory
-14.9MiB live, 269.0MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066464
0122448
1465382
23785382
08212368
Stop Event
iter limit
node limit
iter limit
Counts
27 → 522
Calls
Call 1
Inputs
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 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 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
(-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))
(-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)
(+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(cos.f64 (-.f64 lambda2 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(sin.f64 (+.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval252.0ms (1.4%)

Memory
56.2MiB live, 556.3MiB allocated
Compiler

Compiled 61 137 to 3 827 computations (93.7% saved)

prune156.0ms (0.9%)

Memory
-38.0MiB live, 407.9MiB allocated
Pruning

79 alts after pruning (78 fresh and 1 done)

PrunedKeptTotal
New1 780431 823
Fresh253560
Picked415
Done000
Total1 809791 888
Accuracy
99.9%
Counts
1 888 → 79
Alt Table
Click to see full alt table
StatusAccuracyProgram
52.8%
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
60.5%
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
39.4%
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
52.7%
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))))
97.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
95.4%
(+.f64 lambda1 (atan2.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
94.4%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.3%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
41.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
98.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
77.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
98.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))))))
77.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
75.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
96.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (*.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (*.f64 lambda1 (cos.f64 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
97.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
82.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (pow.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
93.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
93.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
73.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
90.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.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 lambda1) (cos.f64 lambda2)))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
79.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
74.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 phi1)))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)))))))
87.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))))
75.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
75.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
87.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
76.0%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
87.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
97.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
74.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
63.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
63.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
64.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal -1 binary64)) (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)))) #s(literal 2 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
52.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
71.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
68.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
68.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
73.4%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
62.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
63.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
74.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
74.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
62.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
52.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
52.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
71.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
70.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
97.7%
(*.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))
99.6%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
97.8%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
Compiler

Compiled 5 015 to 3 074 computations (38.7% saved)

simplify179.0ms (1%)

Memory
22.4MiB live, 102.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
cost-diff0
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
cost-diff0
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
cost-diff0
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
cost-diff0
(cos.f64 phi2)
cost-diff0
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
064825
0105813
1166813
2243813
3344813
4420813
5567813
6761813
71170813
81620813
92021813
102433813
112647813
122789813
132959813
143078813
153123813
163155813
173170813
183176813
193176813
203236813
213260813
223260813
233268813
03268804
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(*.f64 #s(literal -1/2 binary64) phi1)
#s(literal -1/2 binary64)
phi1
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
lambda1
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
(cos.f64 phi1)
phi1
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(*.f64 #s(literal -1/2 binary64) phi1)
#s(literal -1/2 binary64)
phi1
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
#s(literal 1 binary64)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))))) lambda1)
lambda1
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos.f64 phi2)
phi2
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(sin.f64 lambda1)
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(cos.f64 phi1)
phi1

localize380.0ms (2.1%)

Memory
-10.0MiB live, 628.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.17109058943443403
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))
accuracy0.20150375976844204
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))
accuracy0.7896041158816077
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))
accuracy28.067015126165835
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))
accuracy0.20150375976844204
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
accuracy0.6629159207768592
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
accuracy16.641874261537904
(cos.f64 (-.f64 lambda2 lambda1))
accuracy29.736809098018536
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
accuracy0.6629159207768592
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
accuracy16.641874261537904
(cos.f64 (-.f64 lambda2 lambda1))
accuracy16.811905017004417
(sin.f64 (-.f64 lambda1 lambda2))
accuracy32.62936368791433
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
accuracy16.641874261537904
(cos.f64 (-.f64 lambda2 lambda1))
accuracy28.067015126165835
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
accuracy29.917764843575746
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
accuracy41.87774970354969
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
accuracy0.16721927589092145
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
accuracy0.16796875
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
accuracy0.20150375976844204
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
accuracy0.580890488886333
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
Samples
280.0ms176×1valid
34.0ms79×0valid
2.0ms2valid
Compiler

Compiled 642 to 51 computations (92.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 263.0ms
ival-cos: 95.0ms (36.2% of total)
ival-mult: 45.0ms (17.1% of total)
ival-sin: 35.0ms (13.3% of total)
ival-atan2: 29.0ms (11% of total)
adjust: 26.0ms (9.9% of total)
ival-add: 26.0ms (9.9% of total)
ival-sub: 4.0ms (1.5% of total)
ival-neg: 2.0ms (0.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series141.0ms (0.8%)

Memory
-22.3MiB live, 147.9MiB allocated
Counts
27 → 1 068
Calls
Call 1
Inputs
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())
#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())
Outputs
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* 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 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 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 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* 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 phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (cos phi1)) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (+ (cos phi1) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow lambda1 2) (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (+ (cos phi1) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (cos phi1)) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (+ (cos phi1) (* lambda1 (sin lambda2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (+ (cos phi1) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (+ (cos phi1) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1))) (taylor inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1))) (taylor -inf lambda1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 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 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 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 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (cos phi1)) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow lambda2 2) (cos lambda1))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow lambda2 2) (cos lambda1))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos lambda1))) (* 1/24 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (cos phi1)) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (+ (cos phi1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (patch #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<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 phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (-.f64 lambda1 lambda2)) (patch (sin.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow phi2 2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2))) (taylor 0 phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.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)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.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)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1)))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (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 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (cos phi2) (taylor -inf phi2) (#s(alt (cos.f64 phi2) (patch (cos.f64 phi2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) (patch (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (cos lambda1) (cos lambda2))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos lambda2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))) (taylor 0 phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))) (taylor 0 phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor inf phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (patch (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (patch (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) (patch (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) (patch (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (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))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) (patch #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (* (cos lambda1) (cos lambda2))) (taylor -inf phi1) (#s(alt (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) (patch (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor -inf phi1) (#s(alt (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) (patch (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
8.0ms
lambda2
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (cos lambda1) (cos lambda2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (cos lambda2)) (cos phi1))))
4.0ms
phi2
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (cos lambda1) (cos lambda2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (cos lambda2)) (cos phi1))))
4.0ms
phi2
@-inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (cos lambda1) (cos lambda2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (cos lambda2)) (cos phi1))))
4.0ms
lambda2
@-inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (cos lambda1) (cos lambda2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (cos lambda2)) (cos phi1))))
4.0ms
lambda1
@inf
((+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (cos phi2) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (sin (- lambda1 lambda2)) (+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (sin (- lambda1 lambda2))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))) (cos phi2)) (cos phi1)) (* (cos lambda2) (sin lambda1)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (cos (- lambda2 lambda1)) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)) (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (+ (* (cos lambda1) (cos lambda2)) (cos phi1)) (+ (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (cos lambda2)) (cos phi1))))

simplify248.0ms (1.4%)

Memory
27.9MiB live, 339.3MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
054320497
1176919882
2534319853
0846618482
Stop Event
iter limit
node limit
Counts
1 068 → 1 058
Calls
Call 1
Inputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(* lambda1 (cos lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(* -1 (sin lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg 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 phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(+ 1 (* (cos lambda2) (cos phi2)))
(+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ 1 (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos phi1) (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* lambda1 (* (cos phi2) (sin lambda2)))))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(+ (cos lambda2) (cos phi1))
(+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
(+ (cos lambda2) (+ (cos phi1) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow lambda1 2) (cos lambda2)))))))
(+ (cos lambda2) (+ (cos phi1) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))
(+ (cos lambda2) (cos phi1))
(+ (cos lambda2) (+ (cos phi1) (* lambda1 (sin lambda2))))
(+ (cos lambda2) (+ (cos phi1) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))
(+ (cos lambda2) (+ (cos phi1) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2)))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(sin lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (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 phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(+ 1 (* (cos phi2) (cos (neg lambda1))))
(+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(+ 1 (+ (* 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 phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(+ (cos lambda1) (cos phi1))
(+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow lambda2 2) (cos lambda1)))))
(+ (cos lambda1) (+ (cos phi1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow lambda2 2) (cos lambda1)))))))
(+ (cos lambda1) (+ (cos phi1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))
(+ (cos lambda1) (cos phi1))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1))))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1)))))))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1)))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
1
(+ 1 (* -1/2 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ 1 (cos (- lambda2 lambda1)))
(+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(+ 1 (+ (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 phi1) (cos (- lambda1 lambda2)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(cos phi2)
(cos phi2)
(cos phi2)
(cos phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (* (cos lambda1) (cos lambda2)))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos lambda2))))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
Outputs
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* 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 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(* lambda1 (cos lambda2))
(*.f64 (cos.f64 lambda2) lambda1)
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 (cos.f64 lambda2) lambda1))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))))) lambda1)
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ 1 (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* 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 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) #s(literal 1 binary64)))
(+ (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* -1 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1 (* (cos phi2) (sin (neg lambda2)))) (* lambda1 (+ (* -1/2 (* (cos phi2) (cos (neg lambda2)))) (* 1/6 (* lambda1 (* (cos phi2) (sin (neg lambda2))))))))) (* (cos phi2) (cos (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos lambda2) (cos phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda1 (* (cos phi2) (sin lambda2))) (* (cos lambda2) (cos phi2))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi2)))) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* 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 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda2))) lambda1 (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos lambda2) (cos phi1))
(+.f64 (cos.f64 phi1) (cos.f64 lambda2))
(+ (cos lambda2) (+ (cos phi1) (* -1/2 (* (pow lambda1 2) (cos lambda2)))))
(fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1)) (cos.f64 lambda2) (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))
(+ (cos lambda2) (+ (cos phi1) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow lambda1 2) (cos lambda2)))))))
(fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))
(+ (cos lambda2) (+ (cos phi1) (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (cos lambda2))) (* 1/24 (cos lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1) #s(literal 1/24 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (*.f64 lambda1 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))
(+ (cos lambda2) (cos phi1))
(+.f64 (cos.f64 phi1) (cos.f64 lambda2))
(+ (cos lambda2) (+ (cos phi1) (* lambda1 (sin lambda2))))
(fma.f64 (sin.f64 lambda2) lambda1 (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))
(+ (cos lambda2) (+ (cos phi1) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))
(+ (cos lambda2) (+ (cos phi1) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) lambda1)) 1)))
(fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* 1/24 (* (pow lambda2 2) (sin lambda1))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 (*.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1))
(+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/2 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (sin lambda1))) (* 1/24 (sin lambda1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 (sin.f64 lambda1) (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 lambda1)) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ 1 (* (cos phi2) (cos (neg lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1 (* lambda2 (* (cos phi2) (sin (neg lambda1))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* lambda2 (+ (* -1 (* (cos phi2) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi2) (cos (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* 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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (neg.f64 (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) #s(literal 1 binary64)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos lambda1) (cos phi2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (+ (* lambda2 (* (cos phi2) (sin lambda1))) (* (cos lambda1) (cos phi2))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (cos phi2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2 (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos lambda1) (cos phi1))
(+.f64 (cos.f64 phi1) (cos.f64 lambda1))
(+ (cos lambda1) (+ (cos phi1) (* -1/2 (* (pow lambda2 2) (cos lambda1)))))
(fma.f64 (*.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2)) (cos.f64 lambda1) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos lambda1) (+ (cos phi1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* 1/24 (* (pow lambda2 2) (cos lambda1)))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 lambda2 lambda2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos lambda1) (+ (cos phi1) (* (pow lambda2 2) (+ (* -1/2 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos lambda1))) (* 1/24 (cos lambda1))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (*.f64 lambda2 lambda2) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) (*.f64 lambda2 lambda2) (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos lambda1) (cos phi1))
(+.f64 (cos.f64 phi1) (cos.f64 lambda1))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (sin lambda1))))
(fma.f64 (sin.f64 lambda1) lambda2 (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) lambda2 (sin.f64 lambda1)) lambda2 (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ (cos lambda1) (+ (cos phi1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (+.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(fma.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) #s(literal -1/720 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi2 2)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* 1/24 (pow phi2 2)) 1/2)))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/24 (* -1/720 (pow phi2 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))) (cos.f64 phi1))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ 1 (cos (- lambda2 lambda1)))
(+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))
(+ 1 (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi2 2) (cos (- lambda2 lambda1))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
(+ 1 (+ (cos (- lambda2 lambda1)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi2 2) (cos (- lambda2 lambda1))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+ 1 (+ (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)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ (cos phi1) (cos (- lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (cos (- lambda1 lambda2))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (cos (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(+ (cos phi1) (+ (cos (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos (- lambda1 lambda2)))) (* 1/24 (cos (- lambda1 lambda2)))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* -1/2 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(+.f64 (fma.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi2 2) (+ (* -1/2 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(+.f64 (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64))))) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(cos phi2)
(cos.f64 phi2)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (* (cos phi2) (cos (- lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (cos (- lambda1 lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))
(+ 1 (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow phi1 2)) (* (cos lambda1) (cos lambda2))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2))))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) #s(literal 1 binary64)))
(+ 1 (+ (* -1/2 (pow phi1 2)) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) #s(literal 1 binary64))))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))))
(+.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) #s(literal 1 binary64)))
(+ 1 (+ (* (cos lambda1) (cos lambda2)) (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))))
(+.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 phi1 phi1) #s(literal -1/2 binary64)) phi1) phi1 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) #s(literal 1 binary64)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(+ lambda1 (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1)
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (* (cos lambda1) (cos lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))
(+ (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (cos.f64 phi1)))

rewrite211.0ms (1.2%)

Memory
10.3MiB live, 240.5MiB allocated
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
064598
0105525
1415455
23088455
010023455
Stop Event
iter limit
node limit
iter limit
Counts
27 → 400
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 phi2)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))))
(fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(cos.f64 (-.f64 lambda2 lambda1))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))
(sin.f64 (-.f64 lambda1 lambda2))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))
#s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))
#s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1)))
Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval331.0ms (1.9%)

Memory
22.1MiB live, 491.0MiB allocated
Compiler

Compiled 67 285 to 3 675 computations (94.5% saved)

prune223.0ms (1.3%)

Memory
-22.2MiB live, 394.7MiB allocated
Pruning

93 alts after pruning (91 fresh and 2 done)

PrunedKeptTotal
New1 980382 018
Fresh205373
Picked415
Done011
Total2 004932 097
Accuracy
100.0%
Counts
2 097 → 93
Alt Table
Click to see full alt table
StatusAccuracyProgram
52.8%
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
60.5%
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
97.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
75.7%
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
94.4%
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.3%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
41.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
98.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
77.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
98.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))))))
76.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(approx (+ (* (cos lambda1) (cos lambda2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))))))
97.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
76.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
70.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda2 lambda1) phi1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (+.f64 (-.f64 lambda2 lambda1) phi1) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
76.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (+ (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (cos lambda2)) (cos phi1))) (fma.f64 (sin.f64 lambda2) lambda1 (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))))))
76.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
75.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
75.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))))
97.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
97.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (cos.f64 lambda2) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
75.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (cos.f64 lambda2) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
75.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
94.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
95.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
82.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (pow.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
93.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
73.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
90.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.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 lambda1) (cos.f64 lambda2)))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
97.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
63.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
67.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
67.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
72.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)))))))
79.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))))
72.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64))) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
79.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))))
69.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
74.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 phi1)))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
75.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
75.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
76.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
75.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
51.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
87.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
71.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
70.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
96.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
87.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
62.2%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
76.0%
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
75.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
74.0%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
63.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
63.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
74.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.7%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
52.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
68.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
62.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
63.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
74.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
74.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
74.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
62.8%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
52.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
50.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
49.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
52.6%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
52.3%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
51.9%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
71.5%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
70.2%
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
97.7%
(*.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))
99.6%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
97.8%
#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
Compiler

Compiled 8 341 to 2 715 computations (67.4% saved)

regimes352.0ms (2%)

Memory
-10.5MiB live, 503.0MiB allocated
Counts
175 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (cos.f64 lambda2) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (cos.f64 lambda2) lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (pow (sqrt (* (sin lambda1) (cos lambda2))) 2) (*.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda2 lambda1) phi1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (+.f64 (-.f64 lambda2 lambda1) phi1) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal -1 binary64)) (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2)))) #s(literal 2 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.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)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) #s(approx (+ (* (sin lambda1) (sin lambda2)) (+ (* (cos lambda1) (cos lambda2)) (cos phi1))) (fma.f64 (sin.f64 lambda2) lambda1 (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.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 lambda1) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 (sin.f64 lambda2) #s(literal 1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) #s(approx (+ (* (cos lambda1) (cos lambda2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (pow.f64 (sqrt.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (cos.f64 lambda2) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 lambda1 (cos.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (*.f64 lambda1 (cos.f64 lambda2)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64))) (pow.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal -1 binary64)) #s(literal -1 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1))))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 phi2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal -1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (-.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) (pow.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) #s(literal 2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(*.f64 (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal -1 binary64))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))))))
(fma.f64 lambda1 (/.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (*.f64 lambda1 lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 6 binary64))) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) (*.f64 lambda1 lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (pow.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 4 binary64))) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
Calls

7 calls:

57.0ms
phi2
50.0ms
(cos.f64 phi2)
50.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
49.0ms
lambda1
47.0ms
lambda2
Results
AccuracySegmentsBranch
99.6%1lambda1
99.6%1lambda2
99.6%1phi1
99.6%1phi2
99.6%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
99.6%1(cos.f64 phi2)
99.6%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes305.0ms (1.7%)

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

7 calls:

63.0ms
lambda2
55.0ms
lambda1
40.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
36.0ms
phi2
36.0ms
phi1
Results
AccuracySegmentsBranch
98.3%1lambda1
98.3%1lambda2
98.3%1phi1
98.3%1phi2
98.3%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.3%1(cos.f64 phi2)
98.3%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes312.0ms (1.8%)

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

7 calls:

60.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
58.0ms
phi2
41.0ms
(cos.f64 phi1)
38.0ms
lambda2
38.0ms
phi1
Results
AccuracySegmentsBranch
98.2%1lambda1
98.2%1lambda2
98.2%1phi1
98.2%1phi2
98.2%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.2%1(cos.f64 phi2)
98.2%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes466.0ms (2.6%)

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

7 calls:

133.0ms
(cos.f64 phi1)
83.0ms
phi1
60.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
59.0ms
lambda1
44.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
98.0%1lambda1
98.0%1phi1
98.0%1phi2
98.0%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
98.0%1(cos.f64 phi1)
98.0%1lambda2
98.0%1(cos.f64 phi2)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes205.0ms (1.2%)

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

7 calls:

30.0ms
lambda1
30.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
29.0ms
lambda2
28.0ms
(cos.f64 phi2)
28.0ms
phi1
Results
AccuracySegmentsBranch
97.9%1lambda1
97.9%1lambda2
97.9%1phi1
97.9%1phi2
97.9%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.9%1(cos.f64 phi2)
97.9%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes206.0ms (1.2%)

Memory
-15.6MiB live, 227.3MiB allocated
Counts
81 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64) (cos.f64 phi1))))
#s(approx (+ lambda1 (atan2 (* (cos phi2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1))))) (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 (/.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1) lambda1 lambda1))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) (cos.f64 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (fma.f64 (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (/ (- (pow (* (cos lambda2) (sin lambda1)) 2) (* (* (neg (sin lambda2)) (cos lambda1)) (* (neg (sin lambda2)) (cos lambda1)))) (sin (+ lambda2 lambda1))) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (/.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (cos.f64 lambda2) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal -1 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1)))) (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Calls

7 calls:

51.0ms
(cos.f64 phi2)
39.0ms
lambda1
24.0ms
phi2
23.0ms
phi1
21.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
97.8%1lambda1
97.8%1lambda2
97.8%1phi1
97.8%1phi2
97.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
97.8%1(cos.f64 phi2)
97.8%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes161.0ms (0.9%)

Memory
3.1MiB live, 193.2MiB allocated
Counts
53 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
Calls

7 calls:

44.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
31.0ms
phi1
22.0ms
lambda2
17.0ms
lambda1
16.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
96.8%1lambda1
96.8%1lambda2
96.8%1phi1
96.8%1phi2
96.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
96.8%1(cos.f64 phi2)
96.8%1(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes128.0ms (0.7%)

Memory
19.3MiB live, 215.3MiB allocated
Counts
48 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
Calls

7 calls:

28.0ms
(cos.f64 phi2)
26.0ms
lambda1
16.0ms
lambda2
15.0ms
phi2
14.0ms
(cos.f64 phi1)
Results
AccuracySegmentsBranch
92.7%2phi2
97.8%3lambda2
95.7%3(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
94.7%3(cos.f64 phi2)
90.5%2lambda1
92.5%2phi1
92.5%2(cos.f64 phi1)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes18.0ms (0.1%)

Memory
6.2MiB live, 43.0MiB allocated
Counts
47 → 3
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
Calls

1 calls:

15.0ms
lambda2
Results
AccuracySegmentsBranch
96.8%3lambda2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes84.0ms (0.5%)

Memory
-0.5MiB live, 161.7MiB allocated
Counts
46 → 2
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Calls

6 calls:

15.0ms
lambda2
14.0ms
phi2
14.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
14.0ms
(cos.f64 phi1)
12.0ms
phi1
Results
AccuracySegmentsBranch
90.9%2phi1
90.9%2(cos.f64 phi1)
91.3%2phi2
91.5%2(cos.f64 phi2)
92.0%5(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
88.2%3lambda2
Compiler

Compiled 27 to 36 computations (-33.3% saved)

regimes24.0ms (0.1%)

Memory
-25.1MiB live, 21.7MiB allocated
Counts
44 → 2
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Calls

1 calls:

22.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
91.5%2(cos.f64 phi2)
Compiler

Compiled 2 to 5 computations (-150% saved)

regimes62.0ms (0.3%)

Memory
21.0MiB live, 136.0MiB allocated
Counts
41 → 2
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (+ (* (sin lambda2) (neg (cos lambda1))) (* (cos lambda2) (sin lambda1))) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Calls

5 calls:

13.0ms
phi1
11.0ms
(cos.f64 phi1)
11.0ms
phi2
11.0ms
lambda1
11.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
81.5%3lambda1
87.7%2(cos.f64 phi1)
87.6%2phi1
87.7%2phi2
87.7%2(cos.f64 phi2)
Compiler

Compiled 7 to 22 computations (-214.3% saved)

regimes51.0ms (0.3%)

Memory
-7.8MiB live, 77.9MiB allocated
Counts
27 → 2
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi2) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Calls

6 calls:

9.0ms
(cos.f64 phi2)
9.0ms
phi1
8.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
8.0ms
lambda2
8.0ms
phi2
Results
AccuracySegmentsBranch
76.5%1lambda2
81.6%3(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
76.5%1phi1
81.2%2phi2
76.5%1(cos.f64 phi1)
81.9%2(cos.f64 phi2)
Compiler

Compiled 27 to 36 computations (-33.3% saved)

regimes45.0ms (0.3%)

Memory
4.8MiB live, 43.9MiB allocated
Counts
15 → 2
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Calls

7 calls:

14.0ms
phi2
5.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
5.0ms
phi1
5.0ms
lambda2
5.0ms
lambda1
Results
AccuracySegmentsBranch
75.0%1(cos.f64 phi1)
75.0%1lambda2
75.0%1phi1
75.0%1lambda1
75.0%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
75.0%1phi2
77.1%2(cos.f64 phi2)
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes30.0ms (0.2%)

Memory
-26.2MiB live, 13.1MiB allocated
Counts
14 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Calls

2 calls:

24.0ms
lambda2
4.0ms
(cos.f64 phi2)
Results
AccuracySegmentsBranch
75.0%1lambda2
75.0%1(cos.f64 phi2)
Compiler

Compiled 3 to 9 computations (-200% saved)

regimes22.0ms (0.1%)

Memory
29.1MiB live, 29.1MiB allocated
Counts
7 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) #s(literal 1 binary64)))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
Calls

7 calls:

3.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
3.0ms
lambda2
3.0ms
phi1
3.0ms
lambda1
3.0ms
phi2
Results
AccuracySegmentsBranch
74.8%1phi2
74.8%1lambda1
74.8%1phi1
74.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
74.8%1(cos.f64 phi2)
74.8%1(cos.f64 phi1)
74.8%1lambda2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes18.0ms (0.1%)

Memory
-16.7MiB live, 24.5MiB allocated
Counts
4 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
Calls

7 calls:

4.0ms
(cos.f64 phi2)
3.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
2.0ms
lambda2
2.0ms
phi1
2.0ms
phi2
Results
AccuracySegmentsBranch
62.8%1lambda1
62.8%1phi1
62.8%1phi2
62.8%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
62.8%1(cos.f64 phi1)
62.8%1(cos.f64 phi2)
62.8%1lambda2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes31.0ms (0.2%)

Memory
-17.5MiB live, 21.9MiB allocated
Counts
3 → 1
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
Calls

7 calls:

19.0ms
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
2.0ms
lambda1
2.0ms
phi1
2.0ms
(cos.f64 phi2)
2.0ms
phi2
Results
AccuracySegmentsBranch
52.6%1(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
52.6%1(cos.f64 phi2)
52.6%1lambda2
52.6%1lambda1
52.6%1phi1
52.6%1(cos.f64 phi1)
52.6%1phi2
Compiler

Compiled 28 to 40 computations (-42.9% saved)

regimes12.0ms (0.1%)

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

7 calls:

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

Compiled 28 to 40 computations (-42.9% saved)

regimes20.0ms (0.1%)

Memory
-17.5MiB live, 21.7MiB allocated
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

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

7 calls:

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

Compiled 28 to 40 computations (-42.9% saved)

bsearch124.0ms (0.7%)

Memory
12.9MiB live, 50.7MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
3.0ms
2.736142443985591e-18
1.523486656877403e-15
118.0ms
-5160385816617.294
-5998338315.149725
Samples
97.0ms39×1valid
18.0ms105×0valid
Compiler

Compiled 347 to 300 computations (13.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 109.0ms
ival-cos: 94.0ms (86% of total)
ival-sin: 6.0ms (5.5% of total)
ival-mult: 3.0ms (2.7% of total)
adjust: 2.0ms (1.8% of total)
ival-add: 2.0ms (1.8% of total)
ival-atan2: 2.0ms (1.8% of total)
ival-sub: 1.0ms (0.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch11.0ms (0.1%)

Memory
13.8MiB live, 13.8MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
9.0ms
5.352606041992773e-50
2.3213163413434198e-49
1.0ms
-5160385816617.294
-5998338315.149725
Samples
4.0ms1valid
3.0ms25×0valid
Compiler

Compiled 373 to 331 computations (11.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 6.0ms
ival-cos: 4.0ms (63% of total)
ival-mult: 1.0ms (15.8% of total)
ival-sin: 1.0ms (15.8% of total)
adjust: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-atan2: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9143600053836544
0.943013877691345
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch1.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9143600053836544
0.943013877691345
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.9895206568840863
0.9919053371981422
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
0.38761368845578514
0.4207526157040417
Compiler

Compiled 22 to 21 computations (4.5% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.012210505135545198
-0.008109973609565285
Compiler

Compiled 22 to 21 computations (4.5% saved)

simplify115.0ms (0.7%)

Memory
6.1MiB live, 47.3MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01691059
12251059
22351059
32411059
42431059
Stop Event
saturated
Calls
Call 1
Inputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(if (<=.f64 lambda2 #s(literal -6000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 6490371073168535/1298074214633706907132624082305024 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))))
(if (<=.f64 lambda2 #s(literal -6000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 5265614583427859/26328072917139296674479506920917608079723773850137277813577744384 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 8286623314361713/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 8286623314361713/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 4458563631096791/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal -5764607523034235/576460752303423488 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)))) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 #s(literal -1/2 binary64)) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (+.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1))) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)
(if (<=.f64 lambda2 #s(literal -6000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 6490371073168535/1298074214633706907132624082305024 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))))
(if (<=.f64 lambda2 #s(literal -6000000000 binary64)) (+.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (if (<=.f64 lambda2 #s(literal 6490371073168535/1298074214633706907132624082305024 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (+.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)))
(if (<=.f64 lambda2 #s(literal -6000000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 5265614583427859/26328072917139296674479506920917608079723773850137277813577744384 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))))))
(if (<=.f64 lambda2 #s(literal -6000000000 binary64)) (+.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1) (if (<=.f64 lambda2 #s(literal 5265614583427859/26328072917139296674479506920917608079723773850137277813577744384 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))) lambda1) (+.f64 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (cos.f64 phi1)))) lambda1)))
(if (<=.f64 (cos.f64 phi2) #s(literal 8286623314361713/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 8286623314361713/9007199254740992 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(literal 1 binary64))))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 8286623314361713/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 8286623314361713/9007199254740992 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2) #s(literal 1 binary64))))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 4458563631096791/4503599627370496 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 4458563631096791/4503599627370496 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda2) (cos phi2)) (cos phi1)) (+.f64 (cos.f64 phi1) (cos.f64 phi2))))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal 3602879701896397/9007199254740992 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal 3602879701896397/9007199254740992 binary64)) (+.f64 (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(approx (+ (* (cos (- lambda2 lambda1)) (cos phi2)) 1) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(if (<=.f64 (cos.f64 phi2) #s(literal -5764607523034235/576460752303423488 binary64)) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(if (<=.f64 (cos.f64 phi2) #s(literal -5764607523034235/576460752303423488 binary64)) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1) (+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1))
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)))) lambda1)
(+.f64 lambda1 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))))
(+.f64 (atan2.f64 #s(approx (* (cos phi2) (sin (- lambda1 lambda2))) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #s(approx (+ (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (+.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (cos.f64 phi1)))) lambda1)

soundness1.8s (10.2%)

Memory
-6.8MiB live, 1 432.5MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
054320497
1176919882
2534319853
0846618482
071617999
1236417587
2735317568
0807516868
056446
0101397
1365348
22810317
010049306
02303176
16833129
218993074
337453074
084982880
01463
02463
18263
257463
3689963
0844260
064598
0105525
1415455
23088455
010023455
050316852
1161116377
2476816177
0888915157
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 1 780 to 965 computations (45.8% saved)

preprocess176.0ms (1%)

Memory
7.5MiB live, 398.9MiB allocated
Remove

(abs phi1)

(abs phi2)

Compiler

Compiled 3 144 to 1 438 computations (54.3% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...