Bearing on a great circle

Time bar (total: 24.3s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze1.2s (5%)

Memory
-149.4MiB live, 1 347.8MiB 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
7.8%7.8%92%0.2%0%0%0%9
7.8%7.8%92%0.2%0%0%0%10
10.2%10.1%89.7%0.2%0%0%0%11
10.2%10.1%89.7%0.2%0%0%0%12
Compiler

Compiled 26 to 19 computations (26.9% saved)

sample6.3s (25.8%)

Memory
79.0MiB live, 7 157.1MiB allocated
Samples
5.0s5 705×1valid
659.0ms2 551×0valid
Precisions
Click to see histograms. Total time spent on operations: 5.3s
ival-cos: 2.0s (37.5% of total)
ival-sin: 1.9s (35.8% of total)
ival-mult: 628.0ms (11.9% of total)
adjust: 413.0ms (7.8% of total)
ival-sub: 192.0ms (3.6% of total)
ival-atan2: 161.0ms (3.1% of total)
ival-true: 8.0ms (0.2% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain548.0ms (2.3%)

Memory
-19.5MiB live, 550.9MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
61124(1.1359610125514099e+298 -3.4575123378733414e-181 1.538217238184887e-79 -4.487315846669112e+138)0-(sin.f64 (-.f64 lambda1 lambda2))
61124(1.1359610125514099e+298 -3.4575123378733414e-181 1.538217238184887e-79 -4.487315846669112e+138)0-(cos.f64 (-.f64 lambda1 lambda2))
00-0-(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
00-0-(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
00-0-lambda2
00-0-phi2
00-0-(*.f64 (sin.f64 phi1) (cos.f64 phi2))
00-0-(-.f64 lambda1 lambda2)
00-0-(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
00-0-(sin.f64 phi1)
00-0-(cos.f64 phi2)
00-0-lambda1
00-0-phi1
00-0-(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
00-0-(sin.f64 phi2)
00-0-(*.f64 (cos.f64 phi1) (sin.f64 phi2))
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (-.f64 lambda1 lambda2))sensitivity1850
sin.f64(sin.f64 (-.f64 lambda1 lambda2))sensitivity1850
Confusion
Predicted +Predicted -
+600
-12571
Precision
0.32432432432432434
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+6000
-125071
Precision?
0.32432432432432434
Recall?
1.0
Freqs
test
numberfreq
071
2185
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
299.0ms356×1valid
30.0ms156×0valid
Compiler

Compiled 298 to 72 computations (75.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 293.0ms
ival-sin: 121.0ms (41.3% of total)
ival-cos: 112.0ms (38.3% of total)
ival-mult: 23.0ms (7.9% of total)
adjust: 16.0ms (5.5% of total)
ival-sub: 10.0ms (3.4% of total)
ival-atan2: 10.0ms (3.4% of total)
ival-true: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)

preprocess163.0ms (0.7%)

Memory
7.3MiB live, 44.4MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0104352
1242346
2532344
31116344
42100344
53114344
63932344
74219344
84311344
94369344
104416344
114656344
124748344
134748344
144748344
154748344
164748344
01724
03024
14324
27524
313224
418724
526024
637324
747724
865324
975424
1081324
081324
Stop Event
iter limit
saturated
iter limit
saturated
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
Compiler

Compiled 24 to 17 computations (29.2% saved)

eval0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Compiler

Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

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

Compiled 24 to 17 computations (29.2% saved)

simplify33.0ms (0.1%)

Memory
-25.5MiB live, 16.8MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
01790
03090
14390
27590
313290
418790
526090
637390
747790
865390
975490
1081390
081390
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))

localize171.0ms (0.7%)

Memory
23.3MiB live, 178.5MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.16634750976844204
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
accuracy0.24056625976844204
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.230624557091069
(sin.f64 (-.f64 lambda1 lambda2))
Samples
133.0ms178×1valid
23.0ms78×0valid
Compiler

Compiled 182 to 36 computations (80.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 137.0ms
ival-sin: 57.0ms (41.7% of total)
ival-cos: 50.0ms (36.6% of total)
ival-mult: 12.0ms (8.8% of total)
adjust: 8.0ms (5.9% of total)
ival-sub: 5.0ms (3.7% of total)
ival-atan2: 5.0ms (3.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series29.0ms (0.1%)

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

12 calls:

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

simplify218.0ms (0.9%)

Memory
14.4MiB live, 207.4MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02452709
17682627
223572552
344122551
081392499
Stop Event
iter limit
node limit
Counts
204 → 201
Calls
Call 1
Inputs
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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)))))))))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- 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)))))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (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 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 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)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (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)))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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 (- lambda1 lambda2)) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
Outputs
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(* (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 (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 #s(literal 1/2 binary64) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64)))) (*.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 #s(literal 1/2 binary64) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 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 #s(literal -1/6 binary64) (sin.f64 lambda2)) lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (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) (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 (* -1 (/ lambda2 lambda1))))
(-.f64 lambda1 lambda2)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(-.f64 lambda1 lambda2)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(-.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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (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))
(* (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 (- (/ lambda2 lambda1) 1)))
(-.f64 lambda1 lambda2)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(-.f64 lambda1 lambda2)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(-.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 phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(* (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))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(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 lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(*.f64 (sin.f64 phi1) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 lambda2 (*.f64 #s(literal -1/6 binary64) lambda2) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) lambda2 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (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) (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))
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(-.f64 lambda1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(-.f64 lambda1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(-.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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (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))
(* (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))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(-.f64 lambda1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(-.f64 lambda1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(-.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 phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(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 #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 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(fma.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (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) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (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) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))) phi1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))

rewrite332.0ms (1.4%)

Memory
-0.7MiB live, 120.6MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01752
03052
19152
259752
3722552
0808952
Stop Event
iter limit
node limit
iter limit
Counts
6 → 239
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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>

eval135.0ms (0.6%)

Memory
22.6MiB live, 110.3MiB allocated
Compiler

Compiled 19 168 to 1 774 computations (90.7% saved)

prune349.0ms (1.4%)

Memory
-8.6MiB live, 108.3MiB allocated
Pruning

50 alts after pruning (50 fresh and 0 done)

PrunedKeptTotal
New48750537
Fresh000
Picked101
Done000
Total48850538
Accuracy
89.7%
Counts
538 → 50
Alt Table
Click to see full alt table
StatusAccuracyProgram
89.2%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
73.7%
(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 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
76.5%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
79.7%
(atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
82.6%
(atan2.f64 (*.f64 (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))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
76.1%
(atan2.f64 (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.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)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
76.4%
(atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
89.2%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.2%
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
76.4%
(atan2.f64 (*.f64 (*.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)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
62.0%
(atan2.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 (*.f64 lambda1 lambda1) (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.9%
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
27.0%
(atan2.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (pow.f64 lambda2 #s(literal 4 binary64))) (*.f64 (+.f64 lambda2 lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
36.0%
(atan2.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
33.3%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 lambda2) (-.f64 (neg.f64 lambda2) lambda1) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
73.4%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
67.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
79.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))))
79.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
79.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
79.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
79.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1))))))
79.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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))) (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)))))))
77.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))))))
29.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)))))))
67.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
67.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
70.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
70.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
59.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 phi1)) (sin.f64 lambda2))))))
59.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2)))))
54.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
47.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
43.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1))))
70.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
67.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
25.8%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
74.8%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
79.8%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
63.4%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
63.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (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)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 3 424 to 2 346 computations (31.5% saved)

simplify504.0ms (2.1%)

Memory
-22.5MiB live, 219.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
051611
095611
1153611
2304611
3817611
42236611
54240611
65478611
76563611
86747611
96769611
106776611
116776611
127025611
137066611
147077611
157082611
167086611
177088611
187088611
08031611
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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)
lambda1
lambda2
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
phi1
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(sin.f64 phi2)
(cos.f64 phi1)
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(cos.f64 lambda2)
lambda2
lambda1
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
(cos.f64 (-.f64 lambda1 lambda2))
#s(literal 1/2 binary64)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
Outputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.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)
lambda1
lambda2
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(neg.f64 (sin.f64 phi1))
(sin.f64 phi1)
phi1
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(sin.f64 phi2)
(cos.f64 phi1)
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(cos.f64 lambda2)
lambda2
lambda1
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (+.f64 lambda2 lambda1))
(cos.f64 (+.f64 lambda1 lambda2))
(+.f64 lambda2 lambda1)
(+.f64 lambda1 lambda2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
#s(literal 1/2 binary64)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)

localize637.0ms (2.6%)

Memory
26.9MiB live, 662.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.24056625976844204
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.230624557091069
(sin.f64 (-.f64 lambda1 lambda2))
accuracy13.34508143326856
(cos.f64 (+.f64 lambda2 lambda1))
accuracy0.16634750976844204
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
accuracy0.24056625976844204
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy29.16323977819349
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
accuracy0.16634750976844204
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.22884750976844204
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.230624557091069
(sin.f64 (-.f64 lambda1 lambda2))
accuracy0.24056625976844204
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.230624557091069
(sin.f64 (-.f64 lambda1 lambda2))
accuracy28.22500356402843
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.14453125
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
accuracy0.16634750976844204
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy0.24056625976844204
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
Samples
521.0ms171×1valid
39.0ms85×0valid
Compiler

Compiled 1 171 to 95 computations (91.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 455.0ms
ival-sin: 203.0ms (44.6% of total)
ival-cos: 111.0ms (24.4% of total)
ival-mult: 68.0ms (14.9% of total)
adjust: 28.0ms (6.2% of total)
ival-atan2: 17.0ms (3.7% of total)
ival-add: 16.0ms (3.5% of total)
ival-sub: 8.0ms (1.8% of total)
ival-neg: 3.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)

series109.0ms (0.4%)

Memory
2.5MiB live, 127.8MiB allocated
Counts
23 → 780
Calls
Call 1
Inputs
#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
Outputs
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 (* -1 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<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)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (neg lambda2)) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))) (* (sin phi1) (sin (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* 1/2 (* (cos (neg lambda2)) (sin phi1))))) (* (sin phi1) (sin (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<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) (* -1 (* 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))) (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))))) (sin lambda2)))) (taylor 0 lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2))))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda2)) (* -1/6 (sin (neg lambda2))))) (* -1/6 (sin lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.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 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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 lambda1 (taylor inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.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 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 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 lambda1 (taylor -inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<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 phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 lambda1 (taylor 0 lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<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)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1))) (taylor 0 lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (sin lambda1) (sin phi1)))) (* -1 (* (cos lambda1) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* 1/2 (* lambda2 (* (cos lambda1) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* lambda2 (+ (* 1/6 (* lambda2 (* (sin lambda1) (sin phi1)))) (* 1/2 (* (cos lambda1) (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* -1 (* lambda2 (sin lambda1)))) (taylor 0 lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1)))))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* lambda2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda1)) (* 1/6 (sin lambda1)))) (* -1/6 (sin lambda1)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.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 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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 (* -1 lambda2) (taylor inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.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 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 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 (* -1 lambda2) (taylor -inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor -inf lambda2) (#s(alt (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) (patch (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (- lambda1 lambda2)) (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (cos phi1)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin phi2) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2)))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2))))))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* phi1 (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* 1/6 (* (pow phi1 2) (cos (- lambda1 lambda2)))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/6 (cos (- lambda1 lambda2))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (cos (- lambda1 lambda2))) (* 1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (patch (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
19.0ms
phi1
@inf
((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos phi2)) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (sin phi2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
10.0ms
phi2
@inf
((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos phi2)) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (sin phi2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
9.0ms
lambda1
@inf
((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos phi2)) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (sin phi2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
7.0ms
lambda2
@-inf
((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos phi2)) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (sin phi2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
5.0ms
lambda1
@0
((atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (* (cos lambda2) (sin lambda1)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos phi2)) (* (sin phi2) (cos phi1)))) (* (cos phi2) (sin (- lambda1 lambda2))) (cos phi2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (sin phi2)) (* (neg (sin phi1)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))

simplify211.0ms (0.9%)

Memory
-11.2MiB live, 253.3MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
062213379
1210112922
2602112854
0810912569
Stop Event
iter limit
node limit
Counts
780 → 776
Calls
Call 1
Inputs
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* -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)))))
(* -1 (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))
(- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin 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) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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)))))))))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(* (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) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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)))))))))
(* -1 (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin 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))))
(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 phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(* -1 (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (* (sin phi1) (sin (neg lambda2)))))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))) (* (sin phi1) (sin (neg lambda2))))))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* 1/2 (* (cos (neg lambda2)) (sin phi1))))) (* (sin phi1) (sin (neg lambda2))))))
(cos lambda2)
(+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))
(* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2))))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2))))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda2)) (* -1/6 (sin (neg lambda2))))) (* -1/6 (sin lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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 (cos lambda2))
(* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))
(* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))
(* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (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 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(* (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)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (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 (cos lambda2))
(* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(* (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)))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(cos (- lambda2 (* -1 lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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/2 (* lambda2 (sin lambda1))) (cos lambda1))))
(+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos 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)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin 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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))
(+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 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)))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(* -1 (* (cos lambda1) (sin phi1)))
(+ (* -1 (* lambda2 (* (sin lambda1) (sin phi1)))) (* -1 (* (cos lambda1) (sin phi1))))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* 1/2 (* lambda2 (* (cos lambda1) (sin phi1)))))))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* lambda2 (+ (* 1/6 (* lambda2 (* (sin lambda1) (sin phi1)))) (* 1/2 (* (cos lambda1) (sin phi1))))))))
(cos lambda1)
(+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1)))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* lambda2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda1)) (* 1/6 (sin lambda1)))) (* -1/6 (sin lambda1)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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 (cos lambda2)) (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (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)))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin 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))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (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 (cos lambda2)) (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin 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))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(cos (- lambda1 (* -1 lambda2)))
(cos (- lambda1 (* -1 lambda2)))
(cos (- lambda1 (* -1 lambda2)))
(cos (- lambda1 (* -1 lambda2)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin 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 (- lambda1 lambda2)) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(* phi2 (cos phi1))
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(* (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)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(* (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)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(sin phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(* -1 (* phi1 (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* 1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/6 (cos (- lambda1 lambda2)))))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (cos (- lambda1 lambda2))) (* 1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))))
(* phi1 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
Outputs
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (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)))
(* lambda1 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* 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 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 (*.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)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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)))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 #s(literal -1/2 binary64) (*.f64 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 #s(literal -1/2 binary64) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 phi1)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))) lambda1)) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))
(* -1 (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (* (sin phi1) (sin (neg lambda2)))))
(neg.f64 (fma.f64 (*.f64 lambda1 (sin.f64 phi1)) (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 lambda2))))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos (neg lambda2)) (sin phi1)))) (* (sin phi1) (sin (neg lambda2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1))) lambda1 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2)))
(+ (* -1 (* (cos (neg lambda2)) (sin phi1))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (sin phi1) (sin (neg lambda2))))) (* 1/2 (* (cos (neg lambda2)) (sin phi1))))) (* (sin phi1) (sin (neg lambda2))))))
(fma.f64 (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (sin.f64 phi1))) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (cos.f64 lambda2))) lambda1)) lambda1 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))
(fma.f64 (neg.f64 lambda1) (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda2) lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1)))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 phi1)))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 #s(literal 2 binary64) (cos.f64 lambda2))) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))) lambda1))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2))))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda2)) (* -1/6 (sin (neg lambda2))))) (* -1/6 (sin lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda2))) (sin.f64 phi1) (*.f64 (*.f64 lambda1 (fma.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)) (sin.f64 phi1) #s(literal 0 binary64))) (cos.f64 phi2))) lambda1)) lambda1 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (* -1 (/ lambda2 lambda1))))
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))
(*.f64 (-.f64 (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1)
(* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))
(*.f64 (-.f64 (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1)
(* lambda1 (+ (cos lambda2) (* -1 (/ (sin lambda2) lambda1))))
(*.f64 (-.f64 (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.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 (- 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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (- (/ lambda2 lambda1) 1)))
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (+ (* -1 (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))
(*.f64 (-.f64 (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1)
(* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))
(*.f64 (-.f64 (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1)
(* -1 (* lambda1 (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1))))
(*.f64 (-.f64 (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.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))
(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 phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(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 phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) 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/2 (* lambda2 (sin lambda1))) (cos 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 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.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 #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 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) 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 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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) 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 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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* lambda2 (- (* -1/2 (* lambda1 lambda2)) 1)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal -1/2 binary64) #s(literal -1 binary64)) lambda2 lambda1)
(+ lambda1 (* lambda2 (- (* lambda2 (+ (* -1/2 lambda1) (* 1/6 lambda2))) 1)))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1)) lambda2 #s(literal -1 binary64)) lambda2 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.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/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(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 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda2 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2))
(* -1 (* (cos lambda1) (sin phi1)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 phi1))
(+ (* -1 (* lambda2 (* (sin lambda1) (sin phi1)))) (* -1 (* (cos lambda1) (sin phi1))))
(*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* 1/2 (* lambda2 (* (cos lambda1) (sin phi1)))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 lambda1))))
(+ (* -1 (* (cos lambda1) (sin phi1))) (* lambda2 (+ (* -1 (* (sin lambda1) (sin phi1))) (* lambda2 (+ (* 1/6 (* lambda2 (* (sin lambda1) (sin phi1)))) (* 1/2 (* (cos lambda1) (sin phi1))))))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)) (*.f64 (*.f64 lambda2 lambda2) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/6 binary64)) (sin.f64 phi1)))))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))
(fma.f64 (neg.f64 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 lambda1) (neg.f64 (sin.f64 lambda1))) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (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 (neg.f64 (sin.f64 lambda1))) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))
(+ (* lambda2 (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1)))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* lambda2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda1)) (* 1/6 (sin lambda1)))) (* -1/6 (sin lambda1)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda1))) (sin.f64 phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda2 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.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 (- 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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (+ (* -1 (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.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))
(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 phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(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 phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))
(*.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))))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))
(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))))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))
(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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.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)))))
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(* phi2 (cos phi1))
(*.f64 (cos.f64 phi1) phi2)
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) phi2)
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(fma.f64 (pow.f64 phi2 #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (*.f64 (cos.f64 phi1) phi2))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))))) phi2)
(* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64) #s(literal 1/24 binary64)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.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 (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.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 (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))) phi1)
(sin phi2)
(sin.f64 phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(* -1 (* phi1 (cos (- lambda1 lambda2))))
(*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* 1/6 (* (pow phi1 2) (cos (- lambda1 lambda2))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64))) phi1)
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (* (pow phi1 2) (cos (- lambda1 lambda2)))) (* 1/6 (cos (- lambda1 lambda2)))))))
(fma.f64 (pow.f64 phi1 #s(literal 3 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal -1/120 binary64) (*.f64 phi1 phi1) #s(literal 1/6 binary64))) (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(* phi1 (+ (* -1 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/6 (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/120 (cos (- lambda1 lambda2))) (* 1/5040 (* (pow phi1 2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/5040 binary64) (*.f64 phi1 phi1) #s(literal -1/120 binary64))))) phi1)
(* phi1 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))))) phi1)
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (+ (* -1 (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos phi1) (sin phi2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))

rewrite170.0ms (0.7%)

Memory
-1.9MiB live, 312.9MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
051304
095283
1303283
22314283
08258283
Stop Event
iter limit
node limit
iter limit
Counts
23 → 317
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 phi2)
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (+.f64 lambda2 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 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>

eval400.0ms (1.6%)

Memory
54.2MiB live, 672.6MiB allocated
Compiler

Compiled 71 766 to 3 238 computations (95.5% saved)

prune225.0ms (0.9%)

Memory
-27.3MiB live, 354.4MiB allocated
Pruning

83 alts after pruning (83 fresh and 0 done)

PrunedKeptTotal
New1 961642 025
Fresh261945
Picked505
Done000
Total1 992832 075
Accuracy
99.9%
Counts
2 075 → 83
Alt Table
Click to see full alt table
StatusAccuracyProgram
73.7%
(atan2.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
76.5%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
79.7%
(atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
76.5%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
99.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
99.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))))
77.3%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2)))))))
63.9%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))
72.3%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
80.0%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
80.1%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
59.1%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
76.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
76.6%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
81.9%
(atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.2%
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
62.0%
(atan2.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 (*.f64 lambda1 lambda1) (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
36.0%
(atan2.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
33.3%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 lambda2) (-.f64 (neg.f64 lambda2) lambda1) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
73.4%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
67.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
79.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))))
40.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (neg.f64 lambda2))))))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
67.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
70.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
79.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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))) (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)))))))
67.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
70.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
70.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
67.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))))
54.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
67.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
25.8%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 2 binary64)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
74.8%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
67.3%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
70.5%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
67.7%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
63.2%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.8%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
63.3%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
52.1%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
37.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))))
52.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
41.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
40.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) lambda2 (*.f64 #s(literal -1/2 binary64) lambda1)) lambda2 #s(literal -1 binary64)) lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal -1/2 binary64) #s(literal -1 binary64)) lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (*.f64 (-.f64 (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.9%
(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))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
49.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
53.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
49.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2))))))
24.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))))))
43.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
42.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
45.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
45.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (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.f64 (-.f64 lambda1 lambda2)))))
47.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #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 (-.f64 lambda1 lambda2)))))
45.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
42.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))))
45.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
30.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
31.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
49.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
36.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
32.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda1 lambda2) #s(literal -1 binary64))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
35.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
31.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 5 306 to 3 802 computations (28.3% saved)

simplify160.0ms (0.7%)

Memory
5.4MiB live, 162.1MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
063750
0113726
1192697
2430677
31205677
42859645
55761645
08143642
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
phi1
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))))
(sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))
#s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
(/.f64 (neg.f64 lambda2) lambda1)
(neg.f64 lambda2)
lambda2
lambda1
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2))
(sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))
(neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)))
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))
(neg.f64 lambda2)
lambda2
(*.f64 lambda1 lambda1)
lambda1
(/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))
#s(literal 1 binary64)
(neg.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
lambda1
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (neg.f64 (cos.f64 phi2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (neg.f64 (cos.f64 phi2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
phi1
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))))
(sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))
(sin.f64 #s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2)))
#s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
(-.f64 lambda1 lambda2)
(/.f64 (neg.f64 lambda2) lambda1)
(neg.f64 lambda2)
lambda2
lambda1
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))))
(sin.f64 (-.f64 lambda1 lambda2))
(*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))
(-.f64 lambda1 lambda2)
(neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)))
(*.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 lambda2))
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))
(neg.f64 lambda2)
lambda2
(*.f64 lambda1 lambda1)
lambda1
(/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal -1 binary64) (+.f64 lambda1 lambda2))
#s(literal 1 binary64)
(neg.f64 (+.f64 lambda2 lambda1))
(-.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda2 lambda1)
(+.f64 lambda1 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(sin.f64 (+.f64 lambda1 lambda2))
(+.f64 lambda2 lambda1)
(+.f64 lambda1 lambda2)
lambda2
lambda1
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))

localize827.0ms (3.4%)

Memory
-11.2MiB live, 587.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy3.5278593316514972
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.115443680009605
(sin.f64 (+.f64 lambda2 lambda1))
accuracy13.230624557091069
(sin.f64 (-.f64 lambda1 lambda2))
accuracy1.7499807332389217
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.230624557091069
(sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))))
accuracy28.12884276706054
(*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))
accuracy8.693331387382784
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.230624557091069
(sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))
accuracy28.22500356402843
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.230624557091069
(sin.f64 (-.f64 lambda1 lambda2))
accuracy28.22500356402843
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy28.909813026616394
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
accuracy0.16634750976844204
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy0.23046875
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
accuracy0.2890625
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
accuracy0.3007176023150756
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
Samples
536.0ms183×1valid
57.0ms73×0valid
Compiler

Compiled 1 396 to 111 computations (92% saved)

Precisions
Click to see histograms. Total time spent on operations: 429.0ms
ival-cos: 151.0ms (35.2% of total)
ival-sin: 109.0ms (25.4% of total)
ival-mult: 100.0ms (23.3% of total)
adjust: 22.0ms (5.1% of total)
ival-atan2: 18.0ms (4.2% of total)
ival-div: 9.0ms (2.1% of total)
ival-sub: 8.0ms (1.9% of total)
ival-add: 8.0ms (1.9% of total)
ival-neg: 5.0ms (1.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series199.0ms (0.8%)

Memory
5.2MiB live, 204.3MiB allocated
Counts
27 → 888
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())
#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())
#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())
#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())
#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())
#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())
Outputs
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 (* -1 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 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 (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (pow lambda2 2) (taylor 0 lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (pow lambda1 2)) (* -1 (pow lambda2 2))) (taylor 0 lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (pow lambda1 2)) (* -1 (pow lambda2 2))) (taylor 0 lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (pow lambda1 2)) (* -1 (pow lambda2 2))) (taylor 0 lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda2) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (/ lambda1 (pow lambda2 2)) (/ 1 lambda2)) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (* lambda1 (- (/ lambda1 (pow lambda2 4)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2)) (taylor 0 lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 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 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 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 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2)))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1/2 (* (cos lambda2) (sin (neg lambda2)))) (+ (* -1/2 (* (cos (neg lambda2)) (sin lambda2))) (+ (* -1/6 (* (cos lambda2) (sin (neg lambda2)))) (* -1/6 (* (cos (neg lambda2)) (sin lambda2)))))))) (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2))))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))) (* (sin lambda2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2))))) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (sin lambda2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (sin (neg lambda2)))) (+ (* -1/2 (* (cos (neg lambda2)) (sin lambda2))) (+ (* -1/6 (* (cos lambda2) (sin (neg lambda2)))) (* -1/6 (* (cos (neg lambda2)) (sin lambda2))))))) (* (cos lambda2) (cos (neg lambda2)))))) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (sin lambda2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (cos phi2) (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (cos phi2) (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* 1/120 (* (cos phi2) (* (sin lambda2) (sin phi1)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 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 (sin (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* lambda1 (+ (* -1/2 (sin (* -1 lambda2))) (* -1/6 (* lambda1 (cos (* -1 lambda2))))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda2 2)) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<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 lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 lambda1 (taylor inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda1 2)) (taylor inf lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1)) (taylor inf lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1)) (taylor inf lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1)) (taylor inf lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (/ lambda2 lambda1) 1) lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ 1 (* -1 (/ lambda2 lambda1)))) lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (/ (pow lambda2 3) (pow lambda1 3)) (+ 1 (+ (* -1 (/ lambda2 lambda1)) (/ (pow lambda2 2) (pow lambda1 2))))) lambda1) (taylor inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 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 (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2))))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2))))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2))))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 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 (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) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 lambda1 (taylor -inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda1 2)) (taylor -inf lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1)) (taylor -inf lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1)) (taylor -inf lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1)) (taylor -inf lambda1) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda1) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1 (/ lambda2 lambda1))) lambda1)) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (pow lambda2 2) lambda1)) (* -1 lambda2)) lambda1))) lambda1)) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow lambda2 3) lambda1)) (* -1 (pow lambda2 2))) lambda1)) (* -1 lambda2)) lambda1))) lambda1)) (taylor -inf lambda1) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 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 (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2))))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 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 (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 lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 lambda1 (taylor 0 lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 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 (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (pow lambda2 2) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (pow lambda2 2) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (pow lambda2 2) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda1) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (/ lambda2 (pow lambda1 2)) (/ 1 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (+ (* lambda2 (- (/ lambda2 (pow lambda1 4)) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 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 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 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 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (pow (sin lambda1) 2)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1))))) (* (cos phi2) (pow (sin lambda1) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1/2 (* (cos lambda1) (sin lambda1))) (+ (* -1/6 (* (cos lambda1) (sin lambda1))) (+ (* 1/6 (* (cos lambda1) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda1)))))))) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2)))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (pow (sin lambda1) 2) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))) (pow (sin lambda1) 2)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2)))) (* (cos lambda1) (sin lambda1))))) (pow (sin lambda1) 2)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (+ (* -1 (pow (sin lambda1) 2)) (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin lambda1))) (+ (* -1/6 (* (cos lambda1) (sin lambda1))) (+ (* 1/6 (* (cos lambda1) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda1)))))))))) (* (cos lambda1) (sin lambda1))))) (pow (sin lambda1) 2)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/120 (* (cos phi2) (sin phi1))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin phi1)))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 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 (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.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 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (pow lambda1 2) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<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) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 (* -1 lambda2) (taylor inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (pow lambda2 2) (taylor inf lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2))))) (taylor inf lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2))))) (taylor inf lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2))))) (taylor inf lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda2) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (/ lambda1 lambda2) 1) lambda2) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))) lambda2) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ (- (/ (pow lambda1 3) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (/ (pow lambda1 2) (pow lambda2 2))))) lambda2) (taylor inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 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 (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda2 2)) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1)) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1)) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1)) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 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 (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) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 (* -1 lambda2) (taylor -inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 lambda1 lambda2) (patch (-.f64 lambda1 lambda2) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) (patch (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (pow lambda2 2) (taylor -inf lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2))))) (taylor -inf lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2))))) (taylor -inf lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2))))) (taylor -inf lambda2) (#s(alt (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (patch (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #<representation binary64>) () ())) ())
#s(alt (/ -1 lambda2) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1 (/ lambda1 lambda2))) lambda2)) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (pow lambda1 2) lambda2)) (* -1 lambda1)) lambda2))) lambda2)) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow lambda1 3) lambda2)) (* -1 (pow lambda1 2))) lambda2)) (* -1 lambda1)) lambda2))) lambda2)) (taylor -inf lambda2) (#s(alt (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 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 (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow lambda2 2)) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1)) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1)) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1)) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (patch (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 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 (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) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 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 (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 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 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 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 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* 1/24 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (sin lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (cos phi1)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (patch (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (sin lambda2))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin phi2) (taylor 0 phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2)))) (taylor 0 phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2)))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2))))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
88.0ms
lambda2
@0
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (/ (neg lambda2) lambda1) lambda1) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1)))) (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))) (atan2 (* (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (cos phi1) (sin phi2)) (cos (- lambda1 lambda2)) (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (+ (* (neg lambda2) lambda2) (* lambda1 lambda1)) (sin (+ lambda2 lambda1)))
15.0ms
phi1
@inf
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (/ (neg lambda2) lambda1) lambda1) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1)))) (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))) (atan2 (* (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (cos phi1) (sin phi2)) (cos (- lambda1 lambda2)) (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (+ (* (neg lambda2) lambda2) (* lambda1 lambda1)) (sin (+ lambda2 lambda1)))
6.0ms
lambda2
@inf
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (/ (neg lambda2) lambda1) lambda1) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1)))) (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))) (atan2 (* (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (cos phi1) (sin phi2)) (cos (- lambda1 lambda2)) (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (+ (* (neg lambda2) lambda2) (* lambda1 lambda1)) (sin (+ lambda2 lambda1)))
6.0ms
lambda1
@inf
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (/ (neg lambda2) lambda1) lambda1) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1)))) (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))) (atan2 (* (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (cos phi1) (sin phi2)) (cos (- lambda1 lambda2)) (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (+ (* (neg lambda2) lambda2) (* lambda1 lambda1)) (sin (+ lambda2 lambda1)))
6.0ms
lambda1
@-inf
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (atan2 (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))))) (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (+ (* (/ (neg lambda2) lambda1) lambda1) lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1)))) (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))) (atan2 (* (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (atan2 (/ (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (sin (+ lambda2 lambda1))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (cos phi1) (sin phi2)) (cos (- lambda1 lambda2)) (sin (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1))))) (+ (* (neg lambda2) lambda2) (* lambda1 lambda1)) (sin (+ lambda2 lambda1)))

simplify215.0ms (0.9%)

Memory
23.5MiB live, 375.8MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078315377
1268814662
2579514597
0873414290
Stop Event
iter limit
node limit
Counts
888 → 879
Calls
Call 1
Inputs
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* -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)))))
(* -1 (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))
(- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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)))))))))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(* -1 lambda2)
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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)))))))))
(* -1 lambda2)
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(pow lambda2 2)
(- (* -1 (pow lambda1 2)) (* -1 (pow lambda2 2)))
(- (* -1 (pow lambda1 2)) (* -1 (pow lambda2 2)))
(- (* -1 (pow lambda1 2)) (* -1 (pow lambda2 2)))
(/ -1 lambda2)
(- (/ lambda1 (pow lambda2 2)) (/ 1 lambda2))
(- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))
(- (* lambda1 (+ (* lambda1 (- (/ lambda1 (pow lambda2 4)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (sin lambda2) (sin (neg lambda2))))
(+ (* lambda1 (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2)))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1/2 (* (cos lambda2) (sin (neg lambda2)))) (+ (* -1/2 (* (cos (neg lambda2)) (sin lambda2))) (+ (* -1/6 (* (cos lambda2) (sin (neg lambda2)))) (* -1/6 (* (cos (neg lambda2)) (sin lambda2)))))))) (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2))))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(* (sin lambda2) (sin (neg lambda2)))
(+ (* lambda1 (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))) (* (sin lambda2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2))))) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (sin lambda2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (sin (neg lambda2)))) (+ (* -1/2 (* (cos (neg lambda2)) (sin lambda2))) (+ (* -1/6 (* (cos lambda2) (sin (neg lambda2)))) (* -1/6 (* (cos (neg lambda2)) (sin lambda2))))))) (* (cos lambda2) (cos (neg lambda2)))))) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (sin lambda2) (sin (neg lambda2))))
(* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1)))))
(* lambda1 (+ (* (cos phi2) (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1)))))))))
(* lambda1 (+ (* (cos phi2) (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* 1/120 (* (cos phi2) (* (sin lambda2) (sin phi1))))))))))
(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)))))
(sin (* -1 lambda2))
(+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))
(+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2)))))))
(+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* lambda1 (+ (* -1/2 (sin (* -1 lambda2))) (* -1/6 (* lambda1 (cos (* -1 lambda2)))))))))
(* -1 (pow lambda2 2))
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(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 lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* -1 (pow lambda1 2))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(/ -1 lambda1)
(/ (- (/ lambda2 lambda1) 1) lambda1)
(/ (- (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ 1 (* -1 (/ lambda2 lambda1)))) lambda1)
(/ (- (/ (pow lambda2 3) (pow lambda1 3)) (+ 1 (+ (* -1 (/ lambda2 lambda1)) (/ (pow lambda2 2) (pow lambda1 2))))) lambda1)
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))
(sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))
(sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))
(sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))
(pow lambda1 2)
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (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 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (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 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (pow lambda1 2))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(/ -1 lambda1)
(* -1 (/ (+ 1 (* -1 (/ lambda2 lambda1))) lambda1))
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (pow lambda2 2) lambda1)) (* -1 lambda2)) lambda1))) lambda1))
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow lambda2 3) lambda1)) (* -1 (pow lambda2 2))) lambda1)) (* -1 lambda2)) lambda1))) lambda1))
(atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (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)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))
(sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))
(sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))
(sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))
(pow lambda1 2)
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (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/2 (* lambda2 (sin lambda1))) (cos lambda1))))
(+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 (pow lambda1 2))
(- (pow lambda2 2) (pow lambda1 2))
(- (pow lambda2 2) (pow lambda1 2))
(- (pow lambda2 2) (pow lambda1 2))
(/ -1 lambda1)
(- (/ lambda2 (pow lambda1 2)) (/ 1 lambda1))
(- (* lambda2 (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))
(- (* lambda2 (+ (* lambda2 (- (/ lambda2 (pow lambda1 4)) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (pow (sin lambda1) 2))
(+ (* lambda2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1))))) (* (cos phi2) (pow (sin lambda1) 2)))
(+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2)))
(+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1/2 (* (cos lambda1) (sin lambda1))) (+ (* -1/6 (* (cos lambda1) (sin lambda1))) (+ (* 1/6 (* (cos lambda1) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda1)))))))) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2)))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2)))
(pow (sin lambda1) 2)
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))) (pow (sin lambda1) 2))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2)))) (* (cos lambda1) (sin lambda1))))) (pow (sin lambda1) 2))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (+ (* -1 (pow (sin lambda1) 2)) (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin lambda1))) (+ (* -1/6 (* (cos lambda1) (sin lambda1))) (+ (* 1/6 (* (cos lambda1) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda1)))))))))) (* (cos lambda1) (sin lambda1))))) (pow (sin lambda1) 2))
(* lambda2 (* (cos phi2) (sin phi1)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1))))
(* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin phi1))))))))
(* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/120 (* (cos phi2) (sin phi1)))))))))
(* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1)))))
(* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1)))))))))
(* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin phi1))))))))))
(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 (* 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))))))))
(pow lambda1 2)
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(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 lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(pow lambda2 2)
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(/ -1 lambda2)
(/ (- (/ lambda1 lambda2) 1) lambda2)
(/ (- (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))) lambda2)
(/ (- (/ (pow lambda1 3) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (/ (pow lambda1 2) (pow lambda2 2))))) lambda2)
(atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))
(sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))
(sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))
(sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))
(* -1 (pow lambda2 2))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (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)))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (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)))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(pow lambda2 2)
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(/ -1 lambda2)
(* -1 (/ (+ 1 (* -1 (/ lambda1 lambda2))) lambda2))
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (pow lambda1 2) lambda2)) (* -1 lambda1)) lambda2))) lambda2))
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow lambda1 3) lambda2)) (* -1 (pow lambda1 2))) lambda2)) (* -1 lambda1)) lambda2))) lambda2))
(atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (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))) (sin (- lambda1 (* -1 lambda2))))
(* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))
(* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))
(sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))
(sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))
(sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))
(* -1 (pow lambda2 2))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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))))))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))))))
(+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* 1/24 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))))))))
(* (sin lambda2) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1)))
(+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))))))
(+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (sin lambda2) (sin phi1))))))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))
(+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))
(* phi2 (cos phi1))
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* phi1 (* (cos phi2) (sin lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2))))
(* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin lambda2))))))))
(* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2)))))))))
(* phi1 (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))
(sin phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
Outputs
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda1)) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* -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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/6 binary64) (*.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) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 lambda1 (cos.f64 lambda2)) #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(neg.f64 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 lambda1 (cos.f64 lambda2)) #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 lambda2)
(neg.f64 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(pow lambda2 2)
(*.f64 lambda2 lambda2)
(- (* -1 (pow lambda1 2)) (* -1 (pow lambda2 2)))
(fma.f64 (neg.f64 lambda1) lambda1 (*.f64 lambda2 lambda2))
(- (* -1 (pow lambda1 2)) (* -1 (pow lambda2 2)))
(fma.f64 (neg.f64 lambda1) lambda1 (*.f64 lambda2 lambda2))
(- (* -1 (pow lambda1 2)) (* -1 (pow lambda2 2)))
(fma.f64 (neg.f64 lambda1) lambda1 (*.f64 lambda2 lambda2))
(/ -1 lambda2)
(/.f64 #s(literal -1 binary64) lambda2)
(- (/ lambda1 (pow lambda2 2)) (/ 1 lambda2))
(/.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(- (* lambda1 (+ (* -1 (/ lambda1 (pow lambda2 3))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))
(/.f64 (-.f64 (/.f64 (fma.f64 (neg.f64 lambda1) (/.f64 lambda1 lambda2) lambda1) lambda2) #s(literal 1 binary64)) lambda2)
(- (* lambda1 (+ (* lambda1 (- (/ lambda1 (pow lambda2 4)) (/ 1 (pow lambda2 3)))) (/ 1 (pow lambda2 2)))) (/ 1 lambda2))
(fma.f64 (*.f64 (-.f64 (/.f64 lambda1 (pow.f64 lambda2 #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda2 #s(literal 3 binary64)))) lambda1) lambda1 (/.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin lambda2) (sin (neg lambda2))))
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2)))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* lambda1 (+ (* lambda1 (* (cos phi2) (+ (* -1/2 (* (cos lambda2) (sin (neg lambda2)))) (+ (* -1/2 (* (cos (neg lambda2)) (sin lambda2))) (+ (* -1/6 (* (cos lambda2) (sin (neg lambda2)))) (* -1/6 (* (cos (neg lambda2)) (sin lambda2)))))))) (* (cos phi2) (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2))))))) (* (cos phi2) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))))) (* (cos phi2) (* (sin lambda2) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2)))) (cos.f64 phi2)) lambda1 (*.f64 (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)) (cos.f64 phi2)))
(* (sin lambda2) (sin (neg lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2))
(+ (* lambda1 (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2)))) (* (sin lambda2) (sin (neg lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (* (cos lambda2) (cos (neg lambda2))))) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (sin lambda2) (sin (neg lambda2))))
(fma.f64 (fma.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2)) lambda1) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1 (* (sin lambda2) (sin (neg lambda2)))) (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (sin (neg lambda2)))) (+ (* -1/2 (* (cos (neg lambda2)) (sin lambda2))) (+ (* -1/6 (* (cos lambda2) (sin (neg lambda2)))) (* -1/6 (* (cos (neg lambda2)) (sin lambda2))))))) (* (cos lambda2) (cos (neg lambda2)))))) (+ (* (cos lambda2) (sin (neg lambda2))) (* (cos (neg lambda2)) (sin lambda2))))) (* (sin lambda2) (sin (neg lambda2))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2))) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2)))) lambda1 #s(literal 1 binary64)) lambda1 (*.f64 (cos.f64 lambda2) (-.f64 (sin.f64 lambda2) (sin.f64 lambda2)))) lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda2)))
(* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1)
(* lambda1 (+ (* (cos phi2) (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1)
(* lambda1 (+ (* (cos phi2) (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* 1/120 (* (cos phi2) (* (sin lambda2) (sin phi1))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1))) (*.f64 lambda1 lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1)
(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))
(sin (* -1 lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 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 (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* lambda1 (+ (* -1/2 (sin (* -1 lambda2))) (* -1/6 (* lambda1 (cos (* -1 lambda2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 (pow lambda2 2))
(*.f64 (neg.f64 lambda2) lambda2)
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))
(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 (sin.f64 lambda2) lambda1) #s(literal -1/2 binary64) (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 lambda1 (cos.f64 lambda2)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* -1 (pow lambda1 2))
(*.f64 (neg.f64 lambda1) lambda1)
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (*.f64 lambda1 lambda1))
(/ -1 lambda1)
(/.f64 #s(literal -1 binary64) lambda1)
(/ (- (/ lambda2 lambda1) 1) lambda1)
(/.f64 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) lambda1)
(/ (- (* -1 (/ (pow lambda2 2) (pow lambda1 2))) (+ 1 (* -1 (/ lambda2 lambda1)))) lambda1)
(/.f64 (-.f64 (/.f64 (fma.f64 (neg.f64 lambda2) (/.f64 lambda2 lambda1) lambda2) lambda1) #s(literal 1 binary64)) lambda1)
(/ (- (/ (pow lambda2 3) (pow lambda1 3)) (+ 1 (+ (* -1 (/ lambda2 lambda1)) (/ (pow lambda2 2) (pow lambda1 2))))) lambda1)
(/.f64 (-.f64 (-.f64 (pow.f64 (/.f64 lambda2 lambda1) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 lambda2 (/.f64 lambda2 lambda1) (neg.f64 lambda2)) lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(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))
(sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (*.f64 lambda1 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))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (- (/ lambda2 lambda1) 1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (- (/ lambda2 lambda1) 1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)
(* -1 (pow lambda1 2))
(*.f64 (neg.f64 lambda1) lambda1)
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (- (/ (pow lambda2 2) (pow lambda1 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (*.f64 lambda1 lambda1))
(/ -1 lambda1)
(/.f64 #s(literal -1 binary64) lambda1)
(* -1 (/ (+ 1 (* -1 (/ lambda2 lambda1))) lambda1))
(/.f64 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) lambda1)
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (pow lambda2 2) lambda1)) (* -1 lambda2)) lambda1))) lambda1))
(/.f64 (-.f64 (/.f64 (fma.f64 (neg.f64 lambda2) (/.f64 lambda2 lambda1) lambda2) lambda1) #s(literal 1 binary64)) lambda1)
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow lambda2 3) lambda1)) (* -1 (pow lambda2 2))) lambda1)) (* -1 lambda2)) lambda1))) lambda1))
(/.f64 (+.f64 (/.f64 (-.f64 lambda2 (/.f64 (fma.f64 lambda2 lambda2 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (neg.f64 lambda1))) lambda1)) lambda1) #s(literal -1 binary64)) lambda1)
(atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (neg (+ lambda2 (* -1 lambda1)))) (sin (- lambda2 (* -1 lambda1))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(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))
(sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (* -1 (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (- (* -1 lambda1) lambda2))))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ 1 (* -1 (/ (pow lambda2 2) (pow lambda1 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (*.f64 lambda1 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))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (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 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (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 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) 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/2 (* lambda2 (sin lambda1))) (cos 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 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (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 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) 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 (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
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (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 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) 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 (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
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 (pow lambda1 2))
(*.f64 (neg.f64 lambda1) lambda1)
(- (pow lambda2 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (*.f64 lambda2 lambda2))
(- (pow lambda2 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (*.f64 lambda2 lambda2))
(- (pow lambda2 2) (pow lambda1 2))
(fma.f64 (neg.f64 lambda1) lambda1 (*.f64 lambda2 lambda2))
(/ -1 lambda1)
(/.f64 #s(literal -1 binary64) lambda1)
(- (/ lambda2 (pow lambda1 2)) (/ 1 lambda1))
(/.f64 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) lambda1)
(- (* lambda2 (+ (* -1 (/ lambda2 (pow lambda1 3))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))
(/.f64 (-.f64 (/.f64 (fma.f64 (neg.f64 lambda2) (/.f64 lambda2 lambda1) lambda2) lambda1) #s(literal 1 binary64)) lambda1)
(- (* lambda2 (+ (* lambda2 (- (/ lambda2 (pow lambda1 4)) (/ 1 (pow lambda1 3)))) (/ 1 (pow lambda1 2)))) (/ 1 lambda1))
(fma.f64 (*.f64 (-.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 lambda1 #s(literal 3 binary64)))) lambda2) lambda2 (/.f64 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) lambda1))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (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 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (pow (sin lambda1) 2))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2))
(+ (* lambda2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1))))) (* (cos phi2) (pow (sin lambda1) 2)))
(fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2) #s(literal 0 binary64))
(+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) lambda2)) lambda2 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2) #s(literal 0 binary64)))
(+ (* lambda2 (+ (* lambda2 (+ (* lambda2 (* (cos phi2) (+ (* -1/2 (* (cos lambda1) (sin lambda1))) (+ (* -1/6 (* (cos lambda1) (sin lambda1))) (+ (* 1/6 (* (cos lambda1) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda1)))))))) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2)))))) (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))))) (* (cos phi2) (pow (sin lambda1) 2)))
(fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 lambda2 (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (sin.f64 lambda1)))) (cos.f64 phi2)) lambda2 #s(literal 0 binary64)) lambda2 (*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 phi2)))
(pow (sin lambda1) 2)
(pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (* (cos lambda1) (sin lambda1)))) (pow (sin lambda1) 2))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda1) #s(literal 0 binary64))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (* -1 (pow (sin lambda1) 2)))) (* (cos lambda1) (sin lambda1))))) (pow (sin lambda1) 2))
(fma.f64 (neg.f64 lambda2) lambda2 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (sin lambda1))) (+ (* lambda2 (+ (* -1 (pow (cos lambda1) 2)) (+ (* -1 (pow (sin lambda1) 2)) (* lambda2 (+ (* -1/2 (* (cos lambda1) (sin lambda1))) (+ (* -1/6 (* (cos lambda1) (sin lambda1))) (+ (* 1/6 (* (cos lambda1) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda1)))))))))) (* (cos lambda1) (sin lambda1))))) (pow (sin lambda1) 2))
(fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (sin.f64 lambda1))) lambda2 #s(literal -1 binary64)) lambda2) lambda2 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))
(* lambda2 (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 phi1))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) lambda2)
(* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin phi1))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) lambda2)
(* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/120 (* (cos phi2) (sin phi1)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) lambda2)
(* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))
(*.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2)
(* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2)
(* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin phi1))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2)
(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 (* 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))
(pow lambda1 2)
(*.f64 lambda1 lambda1)
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))
(+ (* -1 (pow lambda2 2)) (pow lambda1 2))
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))
(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) lambda2) #s(literal -1/2 binary64) (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 lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(pow lambda2 2)
(*.f64 lambda2 lambda2)
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda1) lambda2) (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda1) lambda2) (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda1) lambda2) (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (*.f64 lambda2 lambda2))
(/ -1 lambda2)
(/.f64 #s(literal -1 binary64) lambda2)
(/ (- (/ lambda1 lambda2) 1) lambda2)
(/.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(/ (- (* -1 (/ (pow lambda1 2) (pow lambda2 2))) (+ 1 (* -1 (/ lambda1 lambda2)))) lambda2)
(/.f64 (-.f64 (/.f64 (fma.f64 (neg.f64 lambda1) (/.f64 lambda1 lambda2) lambda1) lambda2) #s(literal 1 binary64)) lambda2)
(/ (- (/ (pow lambda1 3) (pow lambda2 3)) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (/ (pow lambda1 2) (pow lambda2 2))))) lambda2)
(/.f64 (-.f64 (-.f64 (pow.f64 (/.f64 lambda1 lambda2) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 (fma.f64 lambda1 (/.f64 lambda1 lambda2) (neg.f64 lambda1)) lambda2)) lambda2)
(atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(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))
(sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (* -1 (/ (- (pow lambda2 2) (pow lambda1 2)) (+ lambda1 lambda2))))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(* -1 (pow lambda2 2))
(*.f64 (neg.f64 lambda2) lambda2)
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 lambda2 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))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(pow lambda2 2)
(*.f64 lambda2 lambda2)
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda1) lambda2) (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda1) lambda2) (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ 1 (* -1 (/ (pow lambda1 2) (pow lambda2 2)))))
(*.f64 (fma.f64 (/.f64 (neg.f64 lambda1) lambda2) (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (*.f64 lambda2 lambda2))
(/ -1 lambda2)
(/.f64 #s(literal -1 binary64) lambda2)
(* -1 (/ (+ 1 (* -1 (/ lambda1 lambda2))) lambda2))
(/.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (pow lambda1 2) lambda2)) (* -1 lambda1)) lambda2))) lambda2))
(/.f64 (-.f64 (/.f64 (fma.f64 (neg.f64 lambda1) (/.f64 lambda1 lambda2) lambda1) lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow lambda1 3) lambda2)) (* -1 (pow lambda1 2))) lambda2)) (* -1 lambda1)) lambda2))) lambda2))
(/.f64 (+.f64 (/.f64 (-.f64 lambda1 (/.f64 (fma.f64 lambda1 lambda1 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (neg.f64 lambda2))) lambda2)) lambda2) #s(literal -1 binary64)) lambda2)
(atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(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))
(sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(sin (/ (- (pow lambda2 2) (pow lambda1 2)) (- (* -1 lambda2) lambda1)))
(sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)))
(* -1 (pow lambda2 2))
(*.f64 (neg.f64 lambda2) lambda2)
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (- (/ (pow lambda1 2) (pow lambda2 2)) 1))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 lambda2 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))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))
(fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #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))))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 #s(literal -1/2 binary64) (*.f64 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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 #s(literal -1/2 binary64) (*.f64 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)))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 #s(literal -1/2 binary64) (*.f64 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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
(+ (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))) (* 1/24 (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (sin lambda2) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2)) (sin.f64 phi1))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))
(+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))
(+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))
(* phi2 (cos phi1))
(*.f64 (cos.f64 phi1) phi2)
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) phi2)
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) (cos.f64 phi1)) phi2)
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) (cos.f64 phi1)) phi2)
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda1 lambda2)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) phi1)
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* phi1 (* (cos phi2) (sin lambda2)))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (sin.f64 lambda2))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin lambda2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) phi1)
(* phi1 (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))) phi1)
(sin phi2)
(sin.f64 phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (/ (+ (* -1 (pow lambda2 2)) (pow lambda1 2)) (+ lambda1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))

rewrite178.0ms (0.7%)

Memory
-1.7MiB live, 224.2MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
063412
0113359
1350309
22623305
08437301
Stop Event
iter limit
node limit
iter limit
Counts
27 → 623
Calls
Call 1
Inputs
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1))))
(sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))
(*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))
(neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 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 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1)))))
(fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 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>

eval356.0ms (1.5%)

Memory
17.9MiB live, 604.8MiB allocated
Compiler

Compiled 86 949 to 4 791 computations (94.5% saved)

prune207.0ms (0.8%)

Memory
5.8MiB live, 413.6MiB allocated
Pruning

102 alts after pruning (102 fresh and 0 done)

PrunedKeptTotal
New2 138462 184
Fresh225678
Picked505
Done000
Total2 1651022 267
Accuracy
99.9%
Counts
2 267 → 102
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.8%
(atan2.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
57.7%
(atan2.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (cos.f64 phi2)) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
85.9%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.4%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
76.5%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
54.2%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (fma.f64 (cos.f64 lambda1) lambda2 (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
53.9%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (fma.f64 lambda1 (cos.f64 lambda2) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.5%
(atan2.f64 (/.f64 (*.f64 #s(approx (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
79.7%
(atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
76.5%
(atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))))
77.5%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))))))
99.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
99.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))))
77.3%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2)))))))
63.9%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))
72.3%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
80.0%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
80.1%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
59.1%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
99.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
57.1%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) phi1))))
82.9%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
76.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
76.6%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
81.9%
(atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.2%
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
45.5%
(atan2.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda2 lambda1)) (*.f64 lambda2 lambda2) (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (neg.f64 lambda1) lambda1)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
33.3%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
73.4%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
67.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
79.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))))
70.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
67.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
70.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
70.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
67.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
67.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
74.8%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.0%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
27.1%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #s(approx (/ 1 (neg (+ lambda2 lambda1))) (/.f64 #s(literal -1 binary64) lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
26.1%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 (neg.f64 lambda1) lambda1)) (-.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (pow.f64 lambda1 #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
30.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 #s(approx (+ (* (neg lambda2) lambda2) (* lambda1 lambda1)) (*.f64 (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 lambda2 lambda2)))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
26.3%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 #s(approx (+ (* (neg lambda2) lambda2) (* lambda1 lambda1)) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
27.2%
(atan2.f64 (*.f64 (sin.f64 (*.f64 #s(approx (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
67.7%
(atan2.f64 (*.f64 (sin.f64 #s(approx (* (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (/ 1 (neg (+ lambda2 lambda1)))) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
67.3%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
70.5%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
63.2%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.8%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
47.8%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
63.3%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
52.1%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
37.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))))
52.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
41.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
41.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal -1/2 binary64) #s(literal -1 binary64)) lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (*.f64 (-.f64 (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.1%
(atan2.f64 #s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
49.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
52.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
53.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
30.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 lambda2) lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
49.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
24.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))))))
45.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
45.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
42.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))))
30.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
31.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
49.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
36.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
48.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
48.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1))))))
33.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)))))))
42.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
42.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
44.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
44.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
31.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
44.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
35.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
34.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
30.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 6 602 to 4 644 computations (29.7% saved)

simplify188.0ms (0.8%)

Memory
-20.5MiB live, 95.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
cost-diff0
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
cost-diff0
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
cost-diff0
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
cost-diff0
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
cost-diff0
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))))
cost-diff0
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
cost-diff0
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
cost-diff0
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(sin.f64 lambda1)
cost-diff0
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
cost-diff0
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
cost-diff0
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff0
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
cost-diff0
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
cost-diff13440
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066830
0102830
1168792
2309792
3550792
4721792
5955792
61300792
71713792
82695792
93397792
103959792
114054792
124102792
134102792
144210792
154258792
164258792
174258792
184258792
194258792
204258792
04258785
Stop Event
iter limit
saturated
iter limit
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
lambda1
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
phi1
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda2
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(neg.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(sin.f64 lambda1)
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
phi1
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(sin.f64 lambda2)
(cos.f64 lambda1)
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
phi1
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
Outputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi1)))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi1))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
#s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))
#s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 lambda2))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
lambda1
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
phi1
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda2
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(neg.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(sin.f64 lambda1)
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
phi1
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
phi1
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
(*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))

localize354.0ms (1.5%)

Memory
22.4MiB live, 493.6MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.14453125
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
accuracy0.16634750976844204
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy0.24056625976844204
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
accuracy27.04081436818197
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
accuracy0.24056625976844204
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy28.22500356402843
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))))
accuracy28.909813026616394
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy28.22500356402843
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
accuracy28.909813026616394
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
accuracy29.555975621905567
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
accuracy13.088759294036269
(cos.f64 (-.f64 lambda1 lambda2))
accuracy28.22500356402843
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
accuracy28.909813026616394
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
accuracy37.759560972091556
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
accuracy0.166347509768442
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
accuracy0.16634750976844204
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
accuracy0.21484375
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
accuracy0.2578125
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
Samples
259.0ms178×1valid
36.0ms78×0valid
Compiler

Compiled 1 283 to 93 computations (92.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 234.0ms
ival-cos: 69.0ms (29.4% of total)
ival-sin: 64.0ms (27.3% of total)
ival-mult: 51.0ms (21.8% of total)
adjust: 18.0ms (7.7% of total)
ival-atan2: 15.0ms (6.4% of total)
ival-sub: 10.0ms (4.3% of total)
ival-add: 6.0ms (2.6% of total)
ival-neg: 1.0ms (0.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series85.0ms (0.3%)

Memory
-16.5MiB live, 138.2MiB allocated
Counts
27 → 900
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())
#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())
#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())
Outputs
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 lambda1 (taylor 0 lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1/6 (pow lambda1 2)))) (taylor 0 lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6)))) (taylor 0 lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6)))) (taylor 0 lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 lambda2) (* lambda1 (+ 1 (* 1/2 (* lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 lambda2) (* lambda1 (+ 1 (* lambda1 (+ (* -1/6 lambda1) (* 1/2 lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.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 (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.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 (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (cos lambda2)) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (cos lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<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 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<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 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<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 (* lambda1 (* (sin lambda2) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* 1/120 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (sin lambda2) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<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 phi2) (* (cos (neg lambda2)) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (sin lambda1) (taylor inf lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor inf lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor inf lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor inf lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.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 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) (* (sin lambda2) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (sin lambda1) (taylor -inf lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor -inf lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor -inf lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor -inf lambda1) (#s(alt (sin.f64 lambda1) (patch (sin.f64 lambda1) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.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 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) (* (sin lambda2) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<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 phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<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 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.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 (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.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 (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* -1/2 (* lambda2 (sin lambda1))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1)))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<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 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<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 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<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 (* lambda2 (* (sin lambda1) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (sin lambda1) (sin phi1))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (sin phi1)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin phi1) (* -1/6 (* (pow lambda2 2) (sin phi1))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow lambda2 2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin phi1)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* 1/24 (* (pow lambda2 2) (* (cos phi2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/24 (* (cos phi2) (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (cos lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.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 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) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (cos lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (patch (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (patch (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.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 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) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 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 phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (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 (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.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 (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.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 (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (cos lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (cos phi1)) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (- lambda1 lambda2)) (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos (- lambda1 lambda2)) (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (cos phi1)) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (patch (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (sin lambda1) (sin lambda2))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin lambda2)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin lambda2) (* -1/6 (* (pow phi1 2) (sin lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow phi1 2) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin lambda2))) (* 1/120 (sin lambda2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos lambda2) (cos phi2))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* 1/120 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos lambda2) (cos phi2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin phi2) (taylor 0 phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2)))) (taylor 0 phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2)))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2))))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin phi2) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2)))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2)))))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2))))))) (taylor 0 phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (patch (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (patch #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (patch (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
Calls

12 calls:

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

simplify235.0ms (1%)

Memory
4.4MiB live, 277.6MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
063115275
1221714803
2424114776
3771814776
0838914410
Stop Event
iter limit
node limit
Counts
900 → 899
Calls
Call 1
Inputs
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* -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)))))
(* -1 (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))
(- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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)))))))))
lambda1
(* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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)))))))))
(* -1 lambda2)
(+ lambda1 (* -1 lambda2))
(+ (* -1 lambda2) (* lambda1 (+ 1 (* 1/2 (* lambda1 lambda2)))))
(+ (* -1 lambda2) (* lambda1 (+ 1 (* lambda1 (+ (* -1/6 lambda1) (* 1/2 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))))
(* -1 (sin lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (sin lambda2))
(- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (sin 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) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 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))))))))
(* lambda1 (* (sin lambda2) (sin phi1)))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1))))
(* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* 1/120 (* (pow lambda1 2) (* (sin lambda2) (sin phi1))))))))
(* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (sin lambda2) (sin phi1)))))))))
(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 phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(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 phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))
(sin lambda1)
(sin lambda1)
(sin lambda1)
(sin lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (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))))
(sin lambda1)
(sin lambda1)
(sin lambda1)
(sin lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (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))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (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)))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (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/2 (* lambda2 (sin lambda1))) (cos lambda1))))
(+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos lambda1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))))))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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/2 (* lambda2 (sin lambda1))) (cos lambda1))))
(+ (sin lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (cos 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)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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)))))))
(* lambda2 (* (sin lambda1) (sin phi1)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1))))
(* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (sin lambda1) (sin phi1))))))))
(* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (sin lambda1) (sin phi1)))))))))
(* lambda2 (sin phi1))
(* lambda2 (+ (sin phi1) (* -1/6 (* (pow lambda2 2) (sin phi1)))))
(* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow lambda2 2) (sin phi1)))))))
(* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (cos phi2) (sin phi1))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1)))
(+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* 1/24 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))))))
(+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/24 (* (cos phi2) (sin phi1))))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (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))
(* -1 (* lambda2 (cos lambda1)))
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (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)))
(* -1 (* lambda2 (cos lambda1)))
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (cos lambda2) (sin lambda1))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(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))))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos lambda2) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1)))
(+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))))))
(+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (cos lambda2) (sin phi1))))))))
(* phi2 (cos phi1))
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* (cos (- lambda1 lambda2)) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(* (cos (- lambda1 lambda2)) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(* phi2 (cos phi1))
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* phi1 (* (sin lambda1) (sin lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2))))
(* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (sin lambda1) (sin lambda2))))))))
(* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (sin lambda1) (sin lambda2)))))))))
(* phi1 (sin lambda2))
(* phi1 (+ (sin lambda2) (* -1/6 (* (pow phi1 2) (sin lambda2)))))
(* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow phi1 2) (sin lambda2)))))))
(* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(* phi1 (* (cos lambda2) (cos phi2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2))))
(* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* 1/120 (* (pow phi1 2) (* (cos lambda2) (cos phi2))))))))
(* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos lambda2) (cos phi2)))))))))
(sin phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(sin phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
(* (cos phi1) (sin phi2))
Outputs
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))) lambda1))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #s(literal -1/6 binary64))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* -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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (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)))
(- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (neg.f64 (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)))
lambda1
(* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda1)
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))
(*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64)) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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) (neg.f64 (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 lambda2)
(neg.f64 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ (* -1 lambda2) (* lambda1 (+ 1 (* 1/2 (* lambda1 lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))
(+ (* -1 lambda2) (* lambda1 (+ 1 (* lambda1 (+ (* -1/6 lambda1) (* 1/2 lambda2))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) lambda2 (*.f64 #s(literal -1/6 binary64) lambda1)) lambda1 #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(- (* lambda1 (cos lambda2)) (sin lambda2))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (sin.f64 lambda2))
(- (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))) (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)))
(- (* lambda1 (+ (cos lambda2) (* lambda1 (- (* -1/6 (* lambda1 (cos lambda2))) (* -1/2 (sin lambda2)))))) (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)))
(* lambda1 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #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)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (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 (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 lambda1 lambda1) (cos.f64 lambda2)) lambda1)
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* lambda1 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #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)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (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 (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 lambda1 lambda1) (cos.f64 lambda2)) lambda1)
(* lambda1 (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) lambda1) (sin.f64 phi1))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) lambda1)
(* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* 1/120 (* (pow lambda1 2) (* (sin lambda2) (sin phi1))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) lambda1)
(* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (sin lambda2) (sin phi1)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1))) (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) lambda1)
(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 phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))) lambda1))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.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 phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))) lambda1))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.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 phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(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 phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (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 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2))
(+ (* 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 (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))
(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/2 (* lambda2 (sin lambda1))) (cos 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 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2))
(+ (* 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 (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))
(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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2))
(+ (* 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 (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))
(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))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) lambda2))
(+ (* 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 (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))
(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/2 (* lambda2 (sin lambda1))) (cos 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 (- (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))) (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)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 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))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 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))
(* lambda2 (* (sin lambda1) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda1) lambda2) (sin.f64 phi1))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) lambda2)
(* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (sin lambda1) (sin phi1))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) lambda2)
(* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (sin lambda1) (sin phi1)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) lambda2)
(* lambda2 (sin phi1))
(*.f64 (sin.f64 phi1) lambda2)
(* lambda2 (+ (sin phi1) (* -1/6 (* (pow lambda2 2) (sin phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 phi1)) lambda2)
(* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow lambda2 2) (sin phi1)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (sin.f64 phi1)) lambda2)
(* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) (*.f64 lambda2 lambda2) (sin.f64 phi1)) lambda2)
(* (cos phi2) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* 1/24 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/24 (* (cos phi2) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(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 lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(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 lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* -1 (* lambda2 (cos lambda1)))
(*.f64 (neg.f64 lambda2) (cos.f64 lambda1))
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(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 phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* -1 (* lambda2 (cos lambda1)))
(*.f64 (neg.f64 lambda2) (cos.f64 lambda1))
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.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 lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 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 phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(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 phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(- (+ (* -1/2 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* (cos lambda2) (sin lambda1))) (* (cos lambda1) (sin lambda2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* 1/24 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))))))) (* (cos lambda1) (sin lambda2)))
(fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #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))))
(- (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))) (* 1/24 (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))))))) (* (cos lambda1) (sin lambda2)))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 #s(literal -1/2 binary64) (*.f64 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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 #s(literal -1/2 binary64) (*.f64 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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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 #s(literal -1/2 binary64) (*.f64 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)))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda2) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 lambda2))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))
(+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))
(+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (cos lambda2) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 phi1))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))
(* phi2 (cos phi1))
(*.f64 (cos.f64 phi1) phi2)
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) phi2)
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) (cos.f64 phi1)) phi2)
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) (cos.f64 phi1)) phi2)
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(* phi2 (cos phi1))
(*.f64 (cos.f64 phi1) phi2)
(* phi2 (+ (cos phi1) (* -1/6 (* (pow phi2 2) (cos phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) phi2)
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow phi2 2) (cos phi1)))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi2 phi2) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) (cos.f64 phi1)) phi2)
(* phi2 (+ (cos phi1) (* (pow phi2 2) (+ (* -1/6 (cos phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2) #s(literal 1/120 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64))) (*.f64 phi2 phi2) (cos.f64 phi1)) phi2)
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.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))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1)
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* phi1 (* (sin lambda1) (sin lambda2)))
(*.f64 (*.f64 phi1 (sin.f64 lambda1)) (sin.f64 lambda2))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) phi1)
(* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (sin lambda1) (sin lambda2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) phi1)
(* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (sin lambda1) (sin lambda2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) phi1)
(* phi1 (sin lambda2))
(*.f64 (sin.f64 lambda2) phi1)
(* phi1 (+ (sin lambda2) (* -1/6 (* (pow phi1 2) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 lambda2)) phi1)
(* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow phi1 2) (sin lambda2)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (sin.f64 lambda2)) phi1)
(* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2))) (*.f64 phi1 phi1) (sin.f64 lambda2)) phi1)
(* phi1 (* (cos lambda2) (cos phi2)))
(*.f64 (*.f64 phi1 (cos.f64 lambda2)) (cos.f64 phi2))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) phi1)
(* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* 1/120 (* (pow phi1 2) (* (cos lambda2) (cos phi2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) phi1)
(* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos lambda2) (cos phi2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) phi1)
(sin phi2)
(sin.f64 phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(sin phi2)
(sin.f64 phi2)
(+ (sin phi2) (* -1/2 (* (pow phi1 2) (sin phi2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* 1/24 (* (pow phi1 2) (sin phi2))))))
(fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi1 phi1) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2))
(+ (sin phi2) (* (pow phi1 2) (+ (* -1/2 (sin phi2)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin phi2))) (* 1/24 (sin phi2)))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 phi1) #s(literal 1/24 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) #s(literal -1/2 binary64))) (*.f64 phi1 phi1) (sin.f64 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (- (* (cos lambda2) (sin lambda1)) (* (cos lambda1) (sin lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(* (cos phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))

rewrite182.0ms (0.7%)

Memory
35.5MiB live, 226.1MiB allocated
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
066433
0102396
1314347
22156347
09063347
Stop Event
iter limit
node limit
iter limit
Counts
27 → 459
Calls
Call 1
Inputs
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
(*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
#s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
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>

eval512.0ms (2.1%)

Memory
-74.1MiB live, 587.4MiB allocated
Compiler

Compiled 80 545 to 3 388 computations (95.8% saved)

prune279.0ms (1.1%)

Memory
-8.6MiB live, 558.6MiB allocated
Pruning

116 alts after pruning (115 fresh and 1 done)

PrunedKeptTotal
New2 007402 047
Fresh227597
Picked415
Done000
Total2 0331162 149
Accuracy
99.9%
Counts
2 149 → 116
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.8%
(atan2.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
92.0%
(atan2.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
57.7%
(atan2.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2))) (cos.f64 phi2)) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
85.9%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.4%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (/.f64 (fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
76.5%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
54.2%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (fma.f64 (cos.f64 lambda1) lambda2 (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
53.9%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(approx (sin (+ lambda2 lambda1)) (fma.f64 lambda1 (cos.f64 lambda2) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.5%
(atan2.f64 (/.f64 (*.f64 #s(approx (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
76.5%
(atan2.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))))
77.5%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))))))
99.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
77.3%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2)))))))
63.9%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))))))
72.3%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
80.0%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
80.1%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
57.1%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) phi1))))
82.9%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
76.8%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
72.1%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
72.7%
(atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.5%
(atan2.f64 (*.f64 (sin.f64 (fma.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda2 lambda1)) (*.f64 lambda2 lambda2) (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (neg.f64 lambda1) lambda1)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
33.3%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
73.4%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
67.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
79.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))))
70.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
70.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
67.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
67.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
74.8%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.0%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
27.1%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) #s(approx (/ 1 (neg (+ lambda2 lambda1))) (/.f64 #s(literal -1 binary64) lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
26.1%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 (neg.f64 lambda1) lambda1)) (-.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (pow.f64 lambda1 #s(literal 4 binary64)))))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
30.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 #s(approx (+ (* (neg lambda2) lambda2) (* lambda1 lambda1)) (*.f64 (fma.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 lambda2 lambda2)))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
26.3%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 #s(approx (+ (* (neg lambda2) lambda2) (* lambda1 lambda1)) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
27.2%
(atan2.f64 (*.f64 (sin.f64 (*.f64 #s(approx (neg (+ (* (neg lambda2) lambda2) (* lambda1 lambda1))) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
67.3%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
70.5%
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
63.2%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
47.8%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
47.8%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.6%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
39.9%
(atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
63.3%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
52.1%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))))
52.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
41.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (cos lambda2) lambda1) (neg (sin lambda2))) (*.f64 (-.f64 (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.1%
(atan2.f64 #s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
48.8%
(atan2.f64 #s(approx (* (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (cos phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
51.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
58.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))))
58.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
58.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))))
47.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
47.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
49.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
53.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
50.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 #s(approx (* (sin lambda1) (cos lambda2)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
55.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
30.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 lambda2) lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
49.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
24.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))))))
45.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
45.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))))
30.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
49.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
46.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
33.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)))))))
42.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
44.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
44.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
31.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 (neg.f64 lambda2) lambda1) lambda1 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
44.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
35.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
34.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
39.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (cos.f64 phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
28.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
29.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
42.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
28.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
30.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
30.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
30.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
24.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
28.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
30.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
28.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
20.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
21.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
30.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
33.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
31.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
27.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (*.f64 (neg.f64 lambda2) (cos.f64 lambda1))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
26.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
22.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (sin lambda1) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
25.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (sin lambda1) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 10 211 to 3 513 computations (65.6% saved)

regimes412.0ms (1.7%)

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

6 calls:

87.0ms
lambda1
85.0ms
lambda2
62.0ms
(-.f64 lambda1 lambda2)
57.0ms
phi2
55.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
99.8%1lambda1
99.8%1lambda2
99.8%1phi1
99.8%1phi2
99.8%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.8%1(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes689.0ms (2.8%)

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

6 calls:

234.0ms
phi2
208.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
57.0ms
phi1
57.0ms
(-.f64 lambda1 lambda2)
55.0ms
lambda2
Results
AccuracySegmentsBranch
99.8%1lambda1
99.8%1lambda2
99.8%1phi1
99.8%1phi2
99.8%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.8%1(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes429.0ms (1.8%)

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

6 calls:

100.0ms
phi1
86.0ms
(-.f64 lambda1 lambda2)
70.0ms
lambda1
58.0ms
lambda2
52.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
91.0%2lambda1
91.3%2lambda2
89.2%1phi1
95.2%3phi2
89.2%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
89.2%1(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes81.0ms (0.3%)

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

1 calls:

49.0ms
phi2
Results
AccuracySegmentsBranch
95.1%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes499.0ms (2%)

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

4 calls:

54.0ms
phi2
54.0ms
lambda1
47.0ms
(-.f64 lambda1 lambda2)
47.0ms
lambda2
Results
AccuracySegmentsBranch
89.2%1(-.f64 lambda1 lambda2)
89.2%1lambda1
89.2%1lambda2
89.2%1phi2
Compiler

Compiled 6 to 17 computations (-183.3% saved)

regimes329.0ms (1.4%)

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

6 calls:

71.0ms
phi2
63.0ms
phi1
51.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.0ms
(-.f64 lambda1 lambda2)
46.0ms
lambda1
Results
AccuracySegmentsBranch
89.4%3lambda1
88.5%3phi1
81.9%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
89.3%3lambda2
85.5%3phi2
86.2%3(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes153.0ms (0.6%)

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

3 calls:

58.0ms
lambda2
44.0ms
phi1
43.0ms
lambda1
Results
AccuracySegmentsBranch
88.4%3phi1
83.5%2lambda2
84.3%2lambda1
Compiler

Compiled 3 to 12 computations (-300% saved)

regimes49.0ms (0.2%)

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

1 calls:

43.0ms
phi1
Results
AccuracySegmentsBranch
88.4%3phi1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes47.0ms (0.2%)

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

1 calls:

37.0ms
phi1
Results
AccuracySegmentsBranch
87.9%3phi1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes285.0ms (1.2%)

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

6 calls:

69.0ms
phi2
49.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.0ms
lambda1
40.0ms
(-.f64 lambda1 lambda2)
38.0ms
lambda2
Results
AccuracySegmentsBranch
79.8%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
79.8%1lambda2
79.8%1phi2
79.8%1lambda1
79.8%1(-.f64 lambda1 lambda2)
79.8%1phi1
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes303.0ms (1.2%)

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

6 calls:

125.0ms
lambda1
56.0ms
(-.f64 lambda1 lambda2)
43.0ms
phi1
26.0ms
lambda2
25.0ms
phi2
Results
AccuracySegmentsBranch
72.3%2phi1
72.3%2(-.f64 lambda1 lambda2)
80.0%3lambda1
72.6%2(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
78.9%3phi2
80.2%3lambda2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes51.0ms (0.2%)

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

2 calls:

24.0ms
lambda2
23.0ms
lambda1
Results
AccuracySegmentsBranch
80.0%3lambda1
79.8%3lambda2
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes147.0ms (0.6%)

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

6 calls:

35.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
24.0ms
lambda1
22.0ms
phi1
21.0ms
(-.f64 lambda1 lambda2)
20.0ms
lambda2
Results
AccuracySegmentsBranch
67.4%1(-.f64 lambda1 lambda2)
69.1%2phi1
67.4%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
71.3%3phi2
67.4%1lambda2
72.6%3lambda1
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes25.0ms (0.1%)

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

1 calls:

21.0ms
lambda1
Results
AccuracySegmentsBranch
72.6%3lambda1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes155.0ms (0.6%)

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

5 calls:

48.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
37.0ms
phi1
20.0ms
lambda2
20.0ms
lambda1
20.0ms
phi2
Results
AccuracySegmentsBranch
67.4%1lambda2
67.4%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
67.4%1phi1
67.4%1phi2
67.4%1lambda1
Compiler

Compiled 28 to 33 computations (-17.9% saved)

regimes107.0ms (0.4%)

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

6 calls:

24.0ms
lambda1
18.0ms
lambda2
17.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
15.0ms
phi2
15.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
59.9%4phi2
54.7%4phi1
49.7%1(-.f64 lambda1 lambda2)
62.2%3lambda1
60.8%3lambda2
51.5%2(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes94.0ms (0.4%)

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

2 calls:

46.0ms
lambda1
13.0ms
lambda2
Results
AccuracySegmentsBranch
57.0%3lambda2
58.4%3lambda1
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes73.0ms (0.3%)

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

5 calls:

16.0ms
lambda2
14.0ms
phi1
14.0ms
phi2
14.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
12.0ms
lambda1
Results
AccuracySegmentsBranch
49.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.7%1phi1
49.7%1lambda2
49.7%1phi2
49.7%1lambda1
Compiler

Compiled 28 to 33 computations (-17.9% saved)

regimes59.0ms (0.2%)

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

6 calls:

29.0ms
phi1
7.0ms
phi2
5.0ms
(-.f64 lambda1 lambda2)
5.0ms
lambda1
5.0ms
lambda2
Results
AccuracySegmentsBranch
48.8%1lambda1
48.8%1phi1
48.8%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.8%1(-.f64 lambda1 lambda2)
48.8%1phi2
48.8%1lambda2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes57.0ms (0.2%)

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

6 calls:

27.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
8.0ms
lambda1
5.0ms
phi1
5.0ms
(-.f64 lambda1 lambda2)
5.0ms
phi2
Results
AccuracySegmentsBranch
50.4%3lambda1
50.5%3lambda2
44.4%1phi1
44.4%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
44.4%1(-.f64 lambda1 lambda2)
46.3%2phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes13.0ms (0.1%)

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

2 calls:

5.0ms
lambda1
5.0ms
lambda2
Results
AccuracySegmentsBranch
48.9%3lambda1
48.0%2lambda2
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes6.0ms (0%)

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

1 calls:

5.0ms
lambda2
Results
AccuracySegmentsBranch
47.4%2lambda2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes19.0ms (0.1%)

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

3 calls:

5.0ms
phi2
4.0ms
lambda1
4.0ms
lambda2
Results
AccuracySegmentsBranch
44.4%1phi2
44.4%1lambda1
44.4%1lambda2
Compiler

Compiled 3 to 12 computations (-300% saved)

regimes29.0ms (0.1%)

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

6 calls:

6.0ms
(-.f64 lambda1 lambda2)
5.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
4.0ms
phi2
4.0ms
lambda1
4.0ms
phi1
Results
AccuracySegmentsBranch
36.9%2(-.f64 lambda1 lambda2)
40.4%3lambda1
38.2%3lambda2
33.2%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
35.4%2phi1
33.2%1phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes5.0ms (0%)

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

1 calls:

3.0ms
lambda1
Results
AccuracySegmentsBranch
40.4%3lambda1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes4.0ms (0%)

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

1 calls:

3.0ms
lambda1
Results
AccuracySegmentsBranch
40.4%3lambda1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes2.0ms (0%)

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

1 calls:

2.0ms
lambda1
Results
AccuracySegmentsBranch
38.7%3lambda1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes12.0ms (0%)

Memory
-11.0MiB live, 27.2MiB allocated
Accuracy

Total -6.2b remaining (-14%)

Threshold costs -6.2b (-14%)

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

6 calls:

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

Compiled 31 to 38 computations (-22.6% saved)

bsearch200.0ms (0.8%)

Memory
2.7MiB live, 402.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
96.0ms
188.1056955617738
692587199099.7533
95.0ms
-4176868539961.046
-2821983.370343143
Samples
150.0ms206×1valid
17.0ms82×0valid
Compiler

Compiled 1 215 to 888 computations (26.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 150.0ms
ival-cos: 60.0ms (40% of total)
ival-sin: 55.0ms (36.7% of total)
ival-mult: 14.0ms (9.3% of total)
adjust: 9.0ms (6% of total)
ival-sub: 6.0ms (4% of total)
ival-atan2: 6.0ms (4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch155.0ms (0.6%)

Memory
4.9MiB live, 198.2MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
29.0ms
2.7608393931656063e-30
6.280536601144946e-18
119.0ms
-2821983.370343143
-8.734914544842882e-14
Samples
88.0ms162×1valid
12.0ms78×0valid
Compiler

Compiled 987 to 729 computations (26.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 90.0ms
ival-sin: 33.0ms (36.6% of total)
ival-cos: 28.0ms (31.1% of total)
ival-mult: 11.0ms (12.2% of total)
adjust: 8.0ms (8.9% of total)
ival-sub: 4.0ms (4.4% of total)
ival-atan2: 4.0ms (4.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch137.0ms (0.6%)

Memory
5.6MiB live, 213.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
72.0ms
1.191628215116026e-12
2.2428422118787095e-5
58.0ms
-2.6240107819570624e-20
-1.283225721550752e-21
Samples
88.0ms114×1valid
29.0ms142×0valid
Compiler

Compiled 1 003 to 744 computations (25.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 105.0ms
ival-sin: 42.0ms (39.9% of total)
ival-cos: 40.0ms (38% of total)
ival-mult: 10.0ms (9.5% of total)
adjust: 5.0ms (4.8% of total)
ival-sub: 4.0ms (3.8% of total)
ival-atan2: 4.0ms (3.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch136.0ms (0.6%)

Memory
-25.5MiB live, 210.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
88.0ms
16861.30605904266
481513.4852158551
41.0ms
-75.53019484119152
-65.58067773652009
Samples
93.0ms103×1valid
29.0ms41×0valid
Compiler

Compiled 549 to 438 computations (20.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 110.0ms
ival-sin: 38.0ms (34.7% of total)
ival-cos: 34.0ms (31% of total)
ival-sub: 23.0ms (21% of total)
ival-mult: 7.0ms (6.4% of total)
adjust: 5.0ms (4.6% of total)
ival-atan2: 3.0ms (2.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch187.0ms (0.8%)

Memory
31.1MiB live, 260.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
93.0ms
6.769351704453426e-13
2.0695182793063703e-6
86.0ms
-65.58067773652009
-11.954734114395361
Samples
154.0ms166×1valid
13.0ms74×0valid
Compiler

Compiled 882 to 699 computations (20.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 156.0ms
ival-sin: 67.0ms (43.1% of total)
ival-cos: 58.0ms (37.3% of total)
ival-mult: 11.0ms (7.1% of total)
adjust: 10.0ms (6.4% of total)
ival-sub: 5.0ms (3.2% of total)
ival-atan2: 4.0ms (2.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch103.0ms (0.4%)

Memory
4.0MiB live, 137.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
98.0ms
6.769351704453426e-13
2.0695182793063703e-6
1.0ms
-65.58067773652009
-11.954734114395361
Samples
86.0ms91×1valid
6.0ms37×0valid
Compiler

Compiled 807 to 624 computations (22.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 86.0ms
ival-cos: 51.0ms (59.3% of total)
ival-sin: 20.0ms (23.3% of total)
ival-mult: 6.0ms (7% of total)
adjust: 4.0ms (4.7% of total)
ival-sub: 2.0ms (2.3% of total)
ival-atan2: 2.0ms (2.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch187.0ms (0.8%)

Memory
-10.2MiB live, 304.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
78.0ms
0.0015635557602427916
5289029.220306165
102.0ms
-3.1313598044812903e+33
-3.1896478724778105e+32
Samples
128.0ms157×1valid
16.0ms83×0valid
Compiler

Compiled 732 to 609 computations (16.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 134.0ms
ival-cos: 48.0ms (35.8% of total)
ival-sin: 42.0ms (31.3% of total)
ival-mult: 28.0ms (20.9% of total)
adjust: 7.0ms (5.2% of total)
ival-sub: 5.0ms (3.7% of total)
ival-atan2: 5.0ms (3.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch134.0ms (0.5%)

Memory
29.6MiB live, 257.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
36.0ms
1.191628215116026e-12
2.2428422118787095e-5
92.0ms
-122067416523198.61
-2.0843295583611847e-7
Samples
69.0ms81×1valid
44.0ms143×0valid
Compiler

Compiled 947 to 784 computations (17.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 104.0ms
ival-sin: 33.0ms (31.8% of total)
ival-cos: 27.0ms (26% of total)
ival-mult: 25.0ms (24.1% of total)
ival-sub: 12.0ms (11.6% of total)
adjust: 4.0ms (3.9% of total)
ival-atan2: 4.0ms (3.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch26.0ms (0.1%)

Memory
-13.9MiB live, 62.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.191628215116026e-12
2.2428422118787095e-5
21.0ms
-2.6240107819570624e-20
-1.283225721550752e-21
Samples
13.0ms16×1valid
5.0ms32×0valid
Compiler

Compiled 747 to 632 computations (15.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 16.0ms
ival-sin: 6.0ms (37.1% of total)
ival-cos: 5.0ms (30.9% of total)
ival-sub: 2.0ms (12.4% of total)
ival-mult: 2.0ms (12.4% of total)
adjust: 1.0ms (6.2% of total)
ival-atan2: 1.0ms (6.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory
12.2MiB live, 12.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.191628215116026e-12
2.2428422118787095e-5
1.0ms
-2.6240107819570624e-20
-1.283225721550752e-21
Compiler

Compiled 731 to 632 computations (13.5% saved)

bsearch162.0ms (0.7%)

Memory
6.5MiB live, 438.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
87.0ms
4.843152920992399e-65
1.9590075050534549e-31
68.0ms
-1.7659019599684154e-44
-3.8930823859778496e-48
Samples
99.0ms128×1valid
42.0ms176×0valid
Compiler

Compiled 844 to 727 computations (13.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 128.0ms
ival-cos: 56.0ms (43.9% of total)
ival-sin: 45.0ms (35.2% of total)
ival-mult: 12.0ms (9.4% of total)
adjust: 6.0ms (4.7% of total)
ival-sub: 5.0ms (3.9% of total)
ival-atan2: 4.0ms (3.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch153.0ms (0.6%)

Memory
-50.3MiB live, 208.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
47.0ms
9.327198699656e-110
8.758821264458672e-109
98.0ms
-2.93019987688723e-64
-8.511893076976066e-73
Samples
96.0ms105×1valid
37.0ms135×0valid
Compiler

Compiled 642 to 564 computations (12.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 115.0ms
ival-cos: 55.0ms (47.9% of total)
ival-sin: 35.0ms (30.5% of total)
ival-mult: 13.0ms (11.3% of total)
adjust: 5.0ms (4.4% of total)
ival-sub: 4.0ms (3.5% of total)
ival-atan2: 3.0ms (2.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch122.0ms (0.5%)

Memory
3.7MiB live, 206.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
37.0ms
7.029903328372467e+22
1.1302769477018746e+23
76.0ms
-3.1896478724778105e+32
-6.457702508794002e+28
Samples
99.0ms162×1valid
5.0ms30×0valid
Compiler

Compiled 527 to 488 computations (7.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 95.0ms
ival-cos: 35.0ms (37% of total)
ival-sin: 35.0ms (37% of total)
ival-mult: 9.0ms (9.5% of total)
adjust: 7.0ms (7.4% of total)
ival-sub: 4.0ms (4.2% of total)
ival-atan2: 4.0ms (4.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch80.0ms (0.3%)

Memory
25.5MiB live, 141.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
75.0ms
-3.5470655838910884e+24
-17043330.357443392
Samples
45.0ms72×1valid
23.0ms88×0valid
Compiler

Compiled 417 to 394 computations (5.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 62.0ms
ival-cos: 26.0ms (42.1% of total)
ival-sin: 21.0ms (34% of total)
ival-mult: 6.0ms (9.7% of total)
adjust: 3.0ms (4.9% of total)
ival-atan2: 3.0ms (4.9% of total)
ival-sub: 2.0ms (3.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch50.0ms (0.2%)

Memory
9.2MiB live, 90.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
48.0ms
-3.1313598044812903e+33
-3.1896478724778105e+32
Samples
44.0ms62×1valid
0.0ms0valid
Compiler

Compiled 255 to 240 computations (5.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 41.0ms
ival-cos: 18.0ms (43.6% of total)
ival-sin: 14.0ms (33.9% of total)
adjust: 3.0ms (7.3% of total)
ival-mult: 3.0ms (7.3% of total)
ival-sub: 1.0ms (2.4% of total)
ival-atan2: 1.0ms (2.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch105.0ms (0.4%)

Memory
-0.3MiB live, 200.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
31.0ms
5.455353180378047e-110
9.327198699656e-110
69.0ms
-1.7092188734588906e-100
-2.1590975088461814e-104
Samples
74.0ms95×1valid
18.0ms97×0valid
Compiler

Compiled 487 to 448 computations (8% saved)

Precisions
Click to see histograms. Total time spent on operations: 84.0ms
ival-sin: 38.0ms (45.4% of total)
ival-cos: 27.0ms (32.2% of total)
ival-mult: 8.0ms (9.6% of total)
adjust: 4.0ms (4.8% of total)
ival-sub: 3.0ms (3.6% of total)
ival-atan2: 3.0ms (3.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch92.0ms (0.4%)

Memory
-6.9MiB live, 190.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
84.0ms
8.758821264458672e-109
2.1421918685928224e-98
3.0ms
-1.7092188734588906e-100
-2.1590975088461814e-104
Samples
61.0ms76×1valid
15.0ms84×0valid
Compiler

Compiled 837 to 762 computations (9% saved)

Precisions
Click to see histograms. Total time spent on operations: 68.0ms
ival-cos: 27.0ms (39.4% of total)
ival-sin: 24.0ms (35.1% of total)
adjust: 6.0ms (8.8% of total)
ival-mult: 6.0ms (8.8% of total)
ival-sub: 3.0ms (4.4% of total)
ival-atan2: 2.0ms (2.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory
6.0MiB live, 6.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
8.758821264458672e-109
2.1421918685928224e-98
1.0ms
-1.7092188734588906e-100
-2.1590975088461814e-104
Compiler

Compiled 711 to 654 computations (8% saved)

bsearch88.0ms (0.4%)

Memory
2.6MiB live, 158.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
12.0ms
5.455353180378047e-110
9.327198699656e-110
72.0ms
-1.934400365104429e-216
-2.8553643277499536e-223
Samples
59.0ms78×1valid
17.0ms98×0valid
Compiler

Compiled 508 to 492 computations (3.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 66.0ms
ival-sin: 27.0ms (41% of total)
ival-cos: 23.0ms (34.9% of total)
ival-mult: 7.0ms (10.6% of total)
ival-sub: 3.0ms (4.6% of total)
adjust: 3.0ms (4.6% of total)
ival-atan2: 3.0ms (4.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify45.0ms (0.2%)

Memory
0.4MiB live, 80.9MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02642448
13622448
24602448
35112448
45392448
55462448
Stop Event
saturated
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(if (<=.f64 phi2 #s(literal -2900000 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 190 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi2 #s(literal -6576556458703583/38685626227668133590597632 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2076918743413931/10384593717069655257060992658440192 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 lambda1 #s(literal -8639981972601953/332306998946228968225951765070086144 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 4722366482869645/295147905179352825856 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(if (<=.f64 phi1 #s(literal -66 binary64)) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 17000 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -12 binary64)) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 6769984589841923/19342813113834066795298816 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -12 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (if (<=.f64 phi1 #s(literal 4352132950612665/604462909807314587353088 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(if (<=.f64 lambda2 #s(literal -580000000000000005903582872207360 binary64)) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda2 #s(literal 5764607523034235/576460752303423488 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -1224979098644775/36028797018963968 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 3246626956972881/147573952589676412928 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -7377215376606283/332306998946228968225951765070086144 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 4722366482869645/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -7377215376606283/332306998946228968225951765070086144 binary64)) (atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 4722366482869645/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 lambda1 #s(literal -7713302612443153/12855504354071922204335696738729300820177623950262342682411008 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 4442964977485945/2923003274661805836407369665432566039311865085952 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -7558907585412001/29642774844752946028434172162224104410437116074403984394101141506025761187823616 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 7192288940437905/10576895500643977583230644928524336637254474927428499508554380724390492659780981533203027367035444557561459392400373732868096 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 lambda2 #s(literal -549999999999999996862794825728 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda2 #s(literal 71000000000000002097152 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -33000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
(if (<=.f64 lambda2 #s(literal -319999999999999988348681438887936 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(if (<=.f64 lambda1 #s(literal -6698341053387061/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 475960297528979/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(if (<=.f64 lambda1 #s(literal -6698341053387061/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6464391641595969/307828173409331868845930000782371982852185463050511302093346042220669701339821957901673955116288403443801781174272 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -6698341053387061/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6464391641595969/307828173409331868845930000782371982852185463050511302093346042220669701339821957901673955116288403443801781174272 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -8818302764268027/6210072369202835740595917953850010221027544068466786444556208152104203810745507545323513635314585911801950922788524292824686320176459257565777149100164724556817819904083399622201061142526393779301051996774865875003571387415264231424 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 3299991396200921/42307582002575910332922579714097346549017899709713998034217522897561970639123926132812109468141778230245837569601494931472384 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
Outputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -2900000 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 190 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi2 #s(literal -2900000 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 phi2 #s(literal 190 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1))))) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 phi2 #s(literal -6576556458703583/38685626227668133590597632 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi2 #s(literal 2076918743413931/10384593717069655257060992658440192 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi2 #s(literal -6576556458703583/38685626227668133590597632 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 phi2 #s(literal 2076918743413931/10384593717069655257060992658440192 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(if (<=.f64 lambda1 #s(literal -8639981972601953/332306998946228968225951765070086144 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 4722366482869645/295147905179352825856 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(if (<=.f64 lambda1 #s(literal -8639981972601953/332306998946228968225951765070086144 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda1 #s(literal 4722366482869645/295147905179352825856 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 phi1 #s(literal -66 binary64)) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 17000 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -66 binary64)) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 phi1 #s(literal 17000 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 phi1 #s(literal -12 binary64)) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 6769984589841923/19342813113834066795298816 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -12 binary64)) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 phi1 #s(literal 6769984589841923/19342813113834066795298816 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (-.f64 #s(approx (* (cos lambda2) (sin lambda1)) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 phi1 #s(literal -12 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (if (<=.f64 phi1 #s(literal 4352132950612665/604462909807314587353088 binary64)) (atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -12 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (if (<=.f64 phi1 #s(literal 4352132950612665/604462909807314587353088 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(if (<=.f64 lambda2 #s(literal -580000000000000005903582872207360 binary64)) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda2 #s(literal 5764607523034235/576460752303423488 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -580000000000000005903582872207360 binary64)) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda2 #s(literal 5764607523034235/576460752303423488 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda1 #s(literal -1224979098644775/36028797018963968 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 3246626956972881/147573952589676412928 binary64)) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -1224979098644775/36028797018963968 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda1 #s(literal 3246626956972881/147573952589676412928 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (neg.f64 (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda1 #s(literal -7377215376606283/332306998946228968225951765070086144 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 4722366482869645/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -7377215376606283/332306998946228968225951765070086144 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda1 #s(literal 4722366482869645/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda1 #s(literal -7377215376606283/332306998946228968225951765070086144 binary64)) (atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 4722366482869645/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(if (<=.f64 lambda1 #s(literal -7377215376606283/332306998946228968225951765070086144 binary64)) (atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda1 #s(literal 4722366482869645/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 (*.f64 #s(approx (- (* (cos lambda2) (sin lambda1)) (* (sin lambda2) (cos lambda1))) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(if (<=.f64 lambda1 #s(literal -7713302612443153/12855504354071922204335696738729300820177623950262342682411008 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 4442964977485945/2923003274661805836407369665432566039311865085952 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -7713302612443153/12855504354071922204335696738729300820177623950262342682411008 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda1 #s(literal 4442964977485945/2923003274661805836407369665432566039311865085952 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda1 #s(literal -7558907585412001/29642774844752946028434172162224104410437116074403984394101141506025761187823616 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda1 #s(literal 7192288940437905/10576895500643977583230644928524336637254474927428499508554380724390492659780981533203027367035444557561459392400373732868096 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 lambda1 #s(literal -7558907585412001/29642774844752946028434172162224104410437116074403984394101141506025761187823616 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda1 #s(literal 7192288940437905/10576895500643977583230644928524336637254474927428499508554380724390492659780981533203027367035444557561459392400373732868096 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(if (<=.f64 lambda2 #s(literal -549999999999999996862794825728 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 lambda2 #s(literal 71000000000000002097152 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -549999999999999996862794825728 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda2 #s(literal 71000000000000002097152 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda2 #s(literal -33000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
(if (<=.f64 lambda2 #s(literal -33000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
(if (<=.f64 lambda2 #s(literal -319999999999999988348681438887936 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))
(if (<=.f64 lambda2 #s(literal -319999999999999988348681438887936 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(if (<=.f64 lambda1 #s(literal -6698341053387061/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 475960297528979/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))))
(if (<=.f64 lambda1 #s(literal -6698341053387061/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 475960297528979/5288447750321988791615322464262168318627237463714249754277190362195246329890490766601513683517722278780729696200186866434048 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda1 #s(literal -6698341053387061/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6464391641595969/307828173409331868845930000782371982852185463050511302093346042220669701339821957901673955116288403443801781174272 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -6698341053387061/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6464391641595969/307828173409331868845930000782371982852185463050511302093346042220669701339821957901673955116288403443801781174272 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -6698341053387061/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6464391641595969/307828173409331868845930000782371982852185463050511302093346042220669701339821957901673955116288403443801781174272 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -6698341053387061/39402006196394479212279040100143613805079739270465446667948293404245721771497210611414266254884915640806627990306816 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6464391641595969/307828173409331868845930000782371982852185463050511302093346042220669701339821957901673955116288403443801781174272 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -8818302764268027/6210072369202835740595917953850010221027544068466786444556208152104203810745507545323513635314585911801950922788524292824686320176459257565777149100164724556817819904083399622201061142526393779301051996774865875003571387415264231424 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 3299991396200921/42307582002575910332922579714097346549017899709713998034217522897561970639123926132812109468141778230245837569601494931472384 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -8818302764268027/6210072369202835740595917953850010221027544068466786444556208152104203810745507545323513635314585911801950922788524292824686320176459257565777149100164724556817819904083399622201061142526393779301051996774865875003571387415264231424 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 3299991396200921/42307582002575910332922579714097346549017899709713998034217522897561970639123926132812109468141778230245837569601494931472384 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (neg.f64 lambda2)))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))

soundness2.1s (8.8%)

Memory
1.1MiB live, 2 112.8MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
063412
0113359
1350309
22623305
08437301
02452709
17682627
223572552
344122551
081392499
063115275
1221714803
2424114776
3771814776
0838914410
051304
095283
1303283
22314283
08258283
062213379
1210112922
2602112854
0810912569
078315377
1268814662
2579514597
0873414290
066433
0102396
1314347
22156347
09063347
01752
03052
19152
259752
3722552
0808952
Stop Event
fuel
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
Compiler

Compiled 4 533 to 2 213 computations (51.2% saved)

preprocess179.0ms (0.7%)

Memory
8.8MiB live, 354.1MiB allocated
Compiler

Compiled 3 398 to 492 computations (85.5% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...